¿Cómo puedo empujar un camino hacia la Ruta Unix variable de entorno en Perl?

En el sistema operativo UNIX, cada proceso en ejecución tiene una colección de variables de entorno al que se puede leer y escribir. Una de esas variables es "camino", que corresponde a una lista separada por dos puntos de carpetas en las que el proceso va a buscar los ejecutables de otros programas que pueda necesitar para funcionar. Si, en particular, su proceso de UNIX consiste en una aplicación Perl en funcionamiento, puede establecer la variable de ruta de acceso desde dentro de su código Perl.

Instrucciones

1 Almacenar el valor que desea asignar a la variable de entorno PATH en una variable Perl, como en el siguiente ejemplo de código:

$ DesiredPath = "/ usr / bin: / usr / local / bin"

Sustituir "/ usr / bin: / usr / local / bin" con el valor que desea asignar a la variable PATH.

2 Crear una cadena de Perl que contiene toda la orden que fijará la variable PATH:

$ SystemCommand = "setenv PATH =". $ DesiredPATH

El "setenv" primitiva será ejecutado por el intérprete de comandos UNIX cuando las transferencias de Perl controlan a ella.

3 Transferir el control a la shell de UNIX mediante el uso integrado de Perl "sistema" función:

sistema ($ systemCommand)

Después de ejecutar esta línea, la variable de entorno PATH tendrá el valor seleccionado en el paso 1.