use strict 编译命令

beyes

如果希望 Perl 对程序的检查更加严格，那么就在程序的开头使用 use strict 编译命令，它会让 Perl 语法编译器强制执行一些严格的，确保是良好的程序设计规则。

一个大众化的建议是，如果你的程序比整个屏幕要长，那么建议都要加上 use strict 命令。

比如下面程序：

[Perl] 纯文本查看 复制代码

#!/usr/bin/perl
myfub();

sub myfub {
        print "hello Perl";
}

像上面这种子程序的定义是放在调用之后的，也许在旧一些 Perl 版本上是没法执行的，然而在较新的 Perl 上可以这么使用(如 5.10.1)。

但是如果在程序的前面加上 use strict ，就会对这种行为发出警告，比如会看到：

./and.pl
Undefined subroutine &main::myfub called at ./and.pl line 3.
BEGIN failed--compilation aborted at ./and.pl line 3.