NAMEperlvar-Perl预定义变量DESCRIPTION预定义名称后面列出的.doc

NAME perlvar - Perl 预定义变量 DESCRIPTION 预定义名称 后面列出的名称对 Perl 来说具有特殊含义。 大多数标点名称都有合理的助记方法或类似于在 shell 中的用法。 然而，如果你就是想用长变量名，那只要在程序开头加上 use English; 即可。这样会为所有短名称在当前包中创建长名称别名。 其中一些甚至还有中间名，一般是从 awk 借用过来的。 一般来说，如果不需要 $PREMATCH，$MATCH 和 $POSTMATCH，那最好使用 use English -no_match_vars; 调用方式，因为它能避免在用正则表达式时出现效率降低的情况。见 English。 依赖当前被选中文件句柄的变量可以通过在 IO::Handle 对象上调用合适的对象方法来设置， 但是这要比使用普通的内建变量效率低一些。(下面的概括行里包含的单词 HANDLE 即指 IO::Handle 对象。) 首先你要声明 use IO::Handle; 然后就可以用 method HANDLE EXPR 或者更安全的形式， HANDLE-method(EXPR) 每个方法都返回 IO::Handle 属性的旧值，同时接受一个可选的 EXPR。 如果提供了该参数，则其指定了所涉及 IO::Handle 属性的新值。如果不提供该参数， 大多数方法不改变当前值--除了 autoflush()，它会假定给定了参数 1，稍有不同。 载入 IO::Handle 类是一项代价高昂的操作，因此你该知道如何使用常规的内建变量。 这些变量中的少数几个是“只读的”。这意味着如果直接或者通过引用间接向该变 量赋值， 就会引起一个运行时异常。 在修改本文档中描述的大部分特殊变量的缺省值时都需要特别小心。多数情况下应 该 在修改之前局部化这些变量，如果不这么做，就可能影响依赖于你所修改特殊变量 缺 省值的其他模块。下面是一次性读入整个文件的一种正确方法： open my $fh, foo or die $!; local $/; # enable localized slurp mode my $content = $fh; close $fh; 但下面的代码就很糟糕： open my $fh, foo or die $!; undef $/; # enable slurp mode my $content = $fh; close $fh; 因为一些模块可能想以默认的“行模式”从文件中读取数据，而一旦我们刚才 列出的代码得到执行，在同一个 Perl 解释器内运行的所有其他代码读到的 $/ 全局值都会被改变。 通常，在局部化一个变量时总是想让影响限制在尽可能小的范围内，因此 应该自己建立一个 {} 块，除非你已经处于某些小的 {} 块内。例如： my $content = ; open my $fh, foo or die $!; { local $/; $content = $fh; } close $fh; 下面是代码失控的一个例子： for (1..5){ nasty_break(); print $_ ; } sub nasty_break { $_ = 5; # do something with $_ } 你可能希望上述代码打印出： 1 2 3 4 5 但实际上得到的却是： 5 5 5 5 5 为什么？因为 nasty_break() 修改了 $_ 而没有事先将其局部化。 改正方法是增加 local()： local $_ = 5; 虽然在这样一个短小的例子里很容易发现问题，但在更复杂的代码中，如果不 对特殊变量进行局部化更改就是在自找麻烦。 下列内容按照先标量变量、