30、Perl 中的作用域、模块与代码导入

Perl 中的作用域、模块与代码导入

1. Perl 特殊变量

在 Perl 里，变量 $ 是输出字段分隔符，用于 print 语句分隔各项内容。若使用 English 模块，既可以继续用 $ 来引用该变量，也能使用 $OUTPUT_FIELD_SEPARATOR 或 $OFS ，这三种方式效果相同。你可以在 perlvar 手册页中找到 Perl 所有特殊变量及其名称（包括使用和不使用 English 模块的情况）。

2. 使用标准库模块示例： Text::Wrap

2.1 模块功能

Text::Wrap 模块可将长字符串拆分成指定长度的多行，还能为每行添加可选的缩进字符。

2.2 示例代码

下面是一个示例，将输入文件格式化为约 80 字符宽，并在每行开头添加 > 符号，类似邮件格式。

#!/usr/ bin/perl -w
use strict;

use Text::Wrap;                 # import module
my $indent = “> “;              # indent character

while (<>) {
    p