Perl で、ファイルの最後にある 1; とは?

モジュールやパッケージをファイルに切り出した場合は、これらの実行の準備が済んだことを Perl インタプリタに知らせるために、パッケージの最後で真を返す必要がある。本来なら return 1; と書くべきなのだが、そこは Perl、多くのモジュールの省略して 1; だけ書かれている。ファイル最後の
1;
return 1;
なのである。
package pkg1;

sub foo {

    print "passed\n";
}

<font color="red"><strong>1;</strong></font> # ここは return 1; と同じ意味
トラックバック URL: https://perltips.twinkle.cc/trackback/67
Posted on 2006-03-05 by yas |