Perl语言入门（第8版）

80

｜

第

4

章

当然，你也可以使用

my

来创建新的私有数组：

my @phone_number;

所有新变量的值一开始都是空的：标量被设为

undef

，数组被设为空列表。

在日常

Perl

编程当中，你最好对每个新变量都使用

my

声明，让它保持在自己所在的

词法作用域内。在第

3

章中，我们看到过如何在

foreach

循环内定义自己的控制变

量，而这个控制变量也可以声明为词法变量：

foreach my $rock (qw/ bedrock slate lava /) {

print "One rock is $rock.\n"; #

依次输出每块石头的名字

}

这一点很重要，接下来的小节里，我们会全面使用这种声明变量的方式。

use strict

编译指令

Perl

是一门相当宽容的编程语言，但有时候你也许希望它能更严格些，多点约束力，

那么不妨试试看

use strict

编译指令。

所谓编译指令（

pragma

），是提供给编译器的某些指示，告诉它如何处理接下来的代

码。这里的

use strict

编译指令是要告诉

Perl

内部的编译器，接下来的代码块或程

序源文件的代码应该严谨遵循优良编程风格。

这么做的重要性何在？嗯，设想你正在写程序并键入下面这行代码：

$bamm_bamm = 3; # Perl

会自动创建这个变量

然后你继续键入了些代码。当上一行代码被新写的代码挤出屏幕顶端后，你又写了下

面这行代码，想增加那个变量的值：

$bammbamm += 1; #

糟了

!

因为

Perl

看到了一个新的变量名（变量名中的下划线是有意义的），它会创建一个新 ...