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 スクリプト内では、これらのファイルに定義されている環境変数を取得できます。

関連情報