Función de enlace simbólico de Perl

Descripción

Esta función crea un vínculo simbólico entre OLDFILE y NEWFILE. En sistemas que no admiten enlaces simbólicos, provoca un error fatal.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

symlink ( OLDFILE, NEWFILE )

Valor devuelto

Esta función devuelve 0 en caso de error y 1 en caso de éxito.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico, primero cree un archivo test.txt en el directorio / tmp y luego pruebe el siguiente ejemplo, creará un enlace simbólico en el mismo directorio:

#!/usr/bin/perl -w

symlink("/tmp/text.txt", "/tmp/symlink_to_text.txt");

Cuando se ejecuta el código anterior, produce el siguiente resultado:

Symbolic link gets created