Perl语言编程特殊技巧

特殊的文件句柄：<>

像其它的默认变量一样，perl语言的这一写为<>的特殊句柄可以使程序编写更容易。这个文件句柄将所有命令行参数都看作文件名，依次打开它们。如果没有命令行参数，那么就从STDIN读入。像unix中的习惯用法per一样，如果将“-”用作命令行参数，它将会打开STDIN代替一个文件。因此如果我们想编写一个像上面提到的可以支持命令行中的文件的程序，这很简单，可以这样写：

print <>;

当你考虑到perl可以仅用8条语句写一个实现cat功能的程序时，你就会明白为什么perl被认为功能强大。但是如果我们想在输入上面实现一些更重要的功能而不是仅仅将其写回显示器上，这该怎样实现？

记录行数

如果我们想单个处理每一行输入，这时仅将文件句柄连到打印是不够的。让我们看一个在每行输入上加上行号的一个小程序。

$num = 0;

while (<>) {

$num = $num + 1;

print "$num\t$_";

}

在这一例子中我们使用$num变量来记录行号，每输入一行，我们将其加一，然后将行号和输入内容一起输出。当我们在字符串中使用由双引号括起的变量时，这一变量名将会用它的内容来代替，这使得perl中的格式化输出变得轻而易举。

仅这几个简单的程序，我们就可以看出使用特殊变量可让你编写更小更快的程序。如果你感兴趣，perl所有特殊变量的用法可以在perl手册的变量部分得到。

责任编辑：德东

查看本文国际来源