Perlについての質問箱 21箱目
■ このスレッドは過去ログ倉庫に格納されています
0801デフォルトの名無しさん
2006/01/22(日) 09:14:00use strict;
my $hoge = require './abc.pl';
print $hoge->{a};
------
---abc.pl---
$VAR = { a => 123, b => 456};
------
mod_perlの環境で動かすと2回目以降のアクセスで
Can't use string ("1") as a HASH ref while "strict refs" in use at hoge.pl
が出てしまいます。
これは1回目は$hogeには$VARが代入されるが2回目以降はコンパイル済みなのでrequireが1を
返すためだと思われます。
$INC{abc.pl}を意図的に消せば毎回読み直してくれますが他に良いアイディアはありませんでしょうか?
■ このスレッドは過去ログ倉庫に格納されています