2007-10-11から1日間の記事一覧
BEGINサブルーチンは、スクリプトのコンパイル時に自動的に1回のみ呼び出されます。 したがって、普通、初期化処理(ファイルの読み込み等)は、ここに記述します。 use strict; my $aaa; &xxx(); sub xxx { print $aaa, "\n"; } sub BEGIN { $aaa = "ABCD"…
BEGINサブルーチンは、スクリプトのコンパイル時に自動的に1回のみ呼び出されます。 したがって、普通、初期化処理(ファイルの読み込み等)は、ここに記述します。 use strict; my $aaa; &xxx(); sub xxx { print $aaa, "\n"; } sub BEGIN { $aaa = "ABCD"…