44、Perl进阶：单行脚本与面向对象编程

Perl进阶：单行脚本与面向对象编程

1. Perl单行脚本

在日常编写Perl脚本时，通常会将脚本写入文件，再用Perl解释器运行。但对于简单任务或只需执行一次的任务，启动编辑器编写脚本显得浪费时间，这时就可使用Perl单行脚本。

1.1 创建单行脚本

使用 -e 选项，后跟引号内的脚本。在Unix系统中示例如下：

% perl -e ‘print “this is a one-liner\n”;’
this is a one-liner
%

在Windows系统中，需使用双引号包围整个脚本，并对字符串中的引号进行转义：

C:\> perl -e “print \”this is a windows one-liner\n\”;”

若脚本包含多条语句，可将它们放在同一行（在大多数Unix shell中，可在每行末尾加反斜杠 \ 将单个命令延续到多行）。

1.2 单行脚本示例

• 反转文件中的所有行：

% perl -e ‘print reverse <>;’ filename.txt

• 打印文件中的所有行并显示行号：