什么是"1;" 在Perl源中?

nic*_*ola 5 oop syntax perl class package

可能重复:
1是什么; Perl意味着什么?

我是Perl的新手,学习如何用Perl构建一个类.

从这个例子开始:http: //www.tutorialspoint.com/perl/perl_oo_perl.htm,我看到一行写成"1;" 只是找不到有关这条有趣线路的信息perldoc.perl.org

你知道这是什么吗?为什么它在Perl源代码中?

小智 7

模块通常是一组子例程定义,但它也可以包含不在子例程中的代码(例如初始化代码).此代码可能会失败,因此Perl允许您通过返回false来指示此情况,因此Perl会因错误而中止.

但是,由于默认返回值为false,因此我们必须在模块末尾显式返回true.

perldocs文档有这样一段话:

该文件必须返回true作为表示成功执行任何初始化代码的最后一个语句,因此习惯上结束这样的文件,1;除非您确定它将返回true否则.但是1;,如果你添加更多的语句,最好放一下