Perl 特殊变量

Perl 语言中定义了一些特殊的变量，通常以 $, @, 或 % 作为前缀，例如：$_。

很多特殊的变量有一个很长的英文名，操作系统变量 $! 可以写为 $OS_ERROR。

如果你想使用英文名的特殊变量需要在程序头部添加 use English;。这样就可以使用具有描述性的英文特殊变量。

最常用的特殊变量为 $_，该变量包含了默认输入和模式匹配内容。实例如下：

#!/usr/bin/perl
 
foreach ('Google','Runoops','Taobao') {
    print $_;
    print "\n";
}

执行以上程序，输出结果为：

Google
Runoops
Taobao

以下实例我们不使用 $_ 来输出内容：

#!/usr/bin/perl
 
foreach ('Google','Runoops','Taobao') {
    print;
    print "\n";
}

执行以上程序，输出结果为：

Google
Runoops
Taobao

实例中，首先输出 "Google" ，接着输出 "Runoops" ，最后输出 "Taobao" 。

在迭代循环中，当前循环的字符串会放在 $_ 中, 然后 通过 print 输出。另外 print 在不指定输出变量，默认情况下使用的也是 $_。

以下是几处即使没有写明 Perl 也会假定使用 $_ 的地方：

• 各种单目函数，包括像 ord() 和 int() 这样的函数以及除 "-t"以外所有的文件 测试操作 ("-f"，"-d")，"-t" 默认操作 STDIN。
• 各种列表函数，例如 print() 和 unlink()。
• 没有使用 "=~" 运算符时的模式匹配操作 "m//"、"s///" 和"tr///"。
• 在没有给出其他变量时是 "foreach" 循环的默认迭代变量。
• grep() 和 map() 函数的隐含迭代变量。
• 当 "while" 仅有唯一条件，且该条件是对 ""操作的结果进行测试时，$_ 就是存放输入记录的默认位置。除了"while" 测试条件之外不会发生这种情况。(助记：下划线在特定操作中是可以省略的。)

特殊变量类型

根据特殊的变量的使用性质，可以分为以下几类：

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

全局标量特殊变量

以下列出了所有的标量特殊变量，包含了特殊字符与英文形式的变量：

全局数组特殊变量

全局哈希特殊变量

全局特殊文件句柄

全局特殊常量

正则表达式特殊变量

文件句柄特殊变量

Perl 读取 .ini 风格配置文件之 Config::IniFiles

如果一个 Perl 脚本中有太多参数需要配置，使用命令行参数的方式就不太合适了。我们可以使用配置文件的方式来配置这些参数，刚好 Config::IniFiles 模块给我们提供了解析 .ini 风格配置文件的方法。重要的是其他语言，如 Python，也有 .ini 风格配置文件解析的包，所以用该方法，便于程序的通用性。

Config::IniFiles

先看一看 .ini 风格配置文件格式：

[section]          #参数模块
Parameter=Value    #该模块某参数的值。配置文件使用'#'或者';'注释

使用方法：

use Config::IniFiles; #加载模块
my $cfg = new Config::IniFiles( -file => "/path/configfile.ini" ); #读取配置文件
my $value = $cfg->val('Section', 'Parameter'); #读取参数

一个更加方便的读取方式：

my %ini
tie %ini, 'Config::IniFiles', ( -file => "/path/configfile.ini" );
#该方法把参数读进了二维哈希（引用的引用），即$ini{Section}{Parameter}

详细用法请参考： http://search.cpan.org/~wadg/Config-IniFiles-2.38/IniFiles.pm