Perlコーディング初心者質問スレ Part 52
■ このスレッドは過去ログ倉庫に格納されています
0872nobodyさん
2006/11/19(日) 21:19:45ID:???私のところで動作させてみたら、エラーは出ずに動きましたよ。
IO::File->new の返り値を確かめましたか?
Hoge.pm
--------
package Hoge;
use IO::File;
sub load {
my $fh = IO::File->new('test.txt','r') or die $!;
my @tmp = $fh->getlines();
$fh->close();
return @tmp;
}
1;
--------
hoge.pl
--------
use Hoge;
print Hoge->load();
--------
■ このスレッドは過去ログ倉庫に格納されています