☰

как прочитать файл внутренней среды в Perl?

tag-icon • tag-icon perl
как прочитать файл внутренней среды в Perl?

Я конвертирую скрипт UNIX в Perl. В UNIX у нас есть

. ${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? То же самое или открывать и читать каждый файл?

решение1

Используйте скрипт оболочки в качестве оболочки для вашего скрипта 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

Внутри скрипта Perl вы можете извлечь переменные среды, определенные в этих файлах.

Связанный контент