07/05/03 13:36:22
use IO::File;
sub func {
my $file = shift(@_);
my $input = IO::File->new($file,"r") or die;
ごにょごにょ
・
・
}
$filename = （ディレクトリからファイルネームをとるロジック）;
&func($filename);
みたいに書くと、一番最初にいきなりファイルオープンのエラーが出ます。
その後、ファイルネームをとるロジックが走ってる模様…。
何故か解らないのですが原因解りますでしょうか。