2005-08 / 2005-08-26

前のエントリ: stoneで穴掘り(より) [SSL]
次のエントリ: 今日の戦利品 [ぬいぐるみ]

Perl 5.005 (以下)でファイルハンドルをスカラ変数に保持
2005-08-26-1 / カテゴリ: [programming][perl] / [permlink]

ぺるりめも - ハンドル名を変数に入れる の方法では、undef のスカラ変数を open の引数にしても
Can't use an undefined value as filehandle reference at ./test.pl line 11.
Can't use an undefined value as a symbol reference at ./test.pl line 11.    (use strict時)
で、実行できない。

で、version 5.005_03 built for sun4-solaris で試した結果、
my $fh = "";
と、とりあえず空文字にしておけばクリアできた…
いいのかな。

で、これだと気持ち悪いので、FileHandle モジュールを使う方法。
use FileHandle;

my $fh;
$fh = new FileHandle "sample.txt", "r"
  or die "cannot open: $!\n";
while (<$fh>) {
  print;
}
$fh->close;
書式が C 言語っぽい…
前のエントリ: stoneで穴掘り(より) [SSL]
次のエントリ: 今日の戦利品 [ぬいぐるみ]

2013 : 01 02 03 04 05 06 07 08 09 10 11 12
2012 : 01 02 03 04 05 06 07 08 09 10 11 12
2011 : 01 02 03 04 05 06 07 08 09 10 11 12
2010 : 01 02 03 04 05 06 07 08 09 10 11 12
2009 : 01 02 03 04 05 06 07 08 09 10 11 12
2008 : 01 02 03 04 05 06 07 08 09 10 11 12
2007 : 01 02 03 04 05 06 07 08 09 10 11 12
2006 : 01 02 03 04 05 06 07 08 09 10 11 12
2005 : 01 02 03 04 05 06 07 08 09 10 11 12
2004 : 01 02 03 04 05 06 07 08 09 10 11 12

最終更新時間: 2013-05-02 16:12