外部ファイルの読み込みにrequireを利用し、指定ファイルパスをスカ

質問

外部ファイルの読み込みにrequireを利用し、指定ファイルパスをスカラー変数で行うとエラーとなる

ファイルには、外部実行の格納ファイル名が入っています。

処理をしたいことは、指定ファイルにある変数を利用して、外部ファイルを実行することです。

実行すると以下のエラーを出しています。

------------------------------------------------------------------
Software error:
Can't locate ./$cfl/puls.cgi in @INC ...略
------------------------------------------------------------------

プログラムは以下の内容です。

------------------------------------------------------------------
省略
open(DATA,"$file")|| die &error(" $file を読み込みopen出来ません");
flock(DATA,1);
@lines = <DATA>;
foreach $line(@lines){
($afl,$bfl,$cfl,$efl,$y3) = split("<>", $lines1);
require './$efl/puls.cgi';
}
close(DATA);
省略
------------------------------------------------------------------

そもそもrequireでスカラー変数が使えないのか?
そのあたりも調べてみたのですが分かりませんでした。
また今回の方法以外にやり方がございましたらご指導頂きたく書き込みいたしました。

お手数かけます。
よろしくお願いいたします。

回答No.1

starbuckslove · ベストアンサー

require './$efl/puls.cgi';

となっているのを

require "./$efl/puls.cgi";

に変えるとどうでしょうか。
変数$eflを展開するには二重引用符を使わないといけませんよ。

お礼

回答ありがとうございます。

以下の対応早速やってみました。

>require "./$efl/puls.cgi";

見事に動作いたしました。
ありがとうございます。

>変数$eflを展開するには二重引用符を使わないといけませんよ。

そうなんですね。
勉強不足です。アドバイスありがとうございます。