¿Cómo leer el archivo del entorno interno en Perl?

¿Cómo leer el archivo del entorno interno en Perl?

Convierto el script UNIX a Perl. en unix tenemos

. ${DTE_WORKING_DIR}/sh/dte.env    
. ${DTE_WORKING_DIR}/sh/xfer.env    
. ${DTE_WORKING_DIR}/sh/dte_reports.env    
. ${DTE_WORKING_DIR}/sh/java.env    

¿Qué debo hacer en Perl? ¿Lo mismo o abrir y leer cada archivo?

Respuesta1

Utilice un script de shell como contenedor para su script perl.

#!/bin/sh
. ${DTE_WORKING_DIR}/sh/dte.env    
. ${DTE_WORKING_DIR}/sh/xfer.env    
. ${DTE_WORKING_DIR}/sh/dte_reports.env    
. ${DTE_WORKING_DIR}/sh/java.env
perl /path/to/file.pl

Dentro del script Perl puede recuperar variables de entorno definidas en esos archivos.

información relacionada