Perl - 特殊变量

Perl 中有一些变量具有预定义的特殊含义。这些变量在使用常规变量指示符（$、@ 或 %）后跟标点字符，例如 $_（下面将解释）。

大多数特殊变量都有类似于英文的长名称，例如，操作系统错误变量 $! 可以写成 $OS_ERROR。但如果要使用类似于英文的名称，则需要在程序文件的顶部添加一行 use English;。这会指导解释器正确识别变量的确切含义。

最常用的特殊变量是 $_，它包含默认输入和模式搜索字符串。例如，在以下代码中 −

#!/usr/bin/perl

foreach ('hickory','dickory','doc') {
   print $_;
   print "\n";
}

执行后，将产生以下结果 −

hickory
dickory
doc

再次查看同一个示例，但不显式使用 $_ 变量 −

#!/usr/bin/perl

foreach ('hickory','dickory','doc') {
   print;
   print "\n";
}

执行后，也将产生以下结果 −

hickory
dickory
doc

第一次循环执行时，打印 "hickory"。第二次循环时，打印 "dickory"，第三次打印 "doc"。这是因为在循环的每次迭代中，当前字符串被置入 $_，并被 print 默认使用。以下是 Perl 即使未指定也会假设使用 $_ 的地方 −

• 各种一元函数，包括像 ord 和 int 这样的函数，以及所有文件测试（-f、-d），除了 -t，它默认使用 STDIN。

• 各种列表函数，如 print 和 unlink。

• 不带 =~ 操作符的模式匹配操作 m//、s/// 和 tr///。

• foreach 循环中如果未提供其他变量时的默认迭代器变量。

• grep 和 map 函数中的隐式迭代器变量。

• 当行输入操作的结果作为 while 测试的唯一条件时（即 <>），默认放置输入记录的位置。请注意，在 while 测试之外，这不会发生。

特殊变量类型

根据特殊变量的使用和性质，我们可以将它们分类为以下类别 −

• 全局标量特殊变量。
• 全局数组特殊变量。
• 全局哈希特殊变量。
• 全局特殊文件句柄。
• 全局特殊常量。
• 正则表达式特殊变量。
• 文件句柄特殊变量。

全局标量特殊变量

以下是所有标量特殊变量的列表。我们列出了符号名称及其对应的英文风格名称。

全局数组特殊变量

全局 Hash 特殊变量

全局特殊文件句柄

全局特殊常量

正则表达式特殊变量

文件句柄特殊变量