Perl 最佳实践(节选) --- 05

第五章：变量

零伍壹.

避免使用非法变量（non-lexical variable）

坚持只用词法变量（my），除非你真的需要只有包或标点变量才能提供的功能。

内置变量的替代做法

变量

用途

替代做法

$1,$2,$3

等等

存储前次正则表达式匹配时

所捕获的子字符串

$&

存储最近由正则表达式

所匹配而得的完整子字符串

在数组正则表达式周围多放一组捕获小括号或者使用Regexp::MatchContext

$`

存储最近成功的正则表达式

匹配之处前面的子字符串

在正则表达式前面放一个((?s).*)以捕获一切，直到你实际感兴趣的模式开头为止，或者改用Regexp::MatchContext

$’

存储最近成功的正则表达式

匹配之处后面的子字符串

在正则表达式尾端放一个((?s).*)以捕获你实际感兴趣的模式后面的一切，或者改用Regexp::MatchContext

$*

控制正则表达式中换行字符

的匹配

使用/m正则表达式修饰符

$.

存储当前输入流中当前行的编号

使用$fh->input_line_number()

$|

控制当前输出流的自动刷新

使用$fh->autoflush()

$”

插入到字符串时所用的数组元素分隔符

使用显示join

$%, $=, $-,

$~, $^, $:,

$^L, $^A

控制Perl的格式化机制

的各种功能

改用Perl6::Form::form

$[

决定数组和字符串的起始索引

绝不要改变以零为起始索引

@F

存储当前行的自动切割的结果

启用Perl时不要使用-a命令行标记

$^W

控制警告

在Perl 5.6.1及后继版本中改用use warnings

零伍贰.

自己做开发是不要使用包变量。

零伍叁.

如果你被迫修改包变量，就将其局域化（localize）。

use YAML;

local $YAML::Indent = 4;       # 缩排量为4，直到控制权离开当前范围

零伍肆.

对你局域化的任何变量做初始化。

零伍伍.

少见的标点变量应使用use English。

完全避开标点变量（punctuationvariable）是不切实际的。

零伍陆.

如果你被迫修改标点变量，就将其局域化（localize）。

零伍叁.

不要使用正则表达式匹配变量。

零伍柒.

通过$_所做的任何修改都要注意。

零伍捌.

从数组尾端计数时使用负数索引。

零伍玖.

利用散列和数组的切片。

零陆零.

为切片使用表格式部署。

零陆壹.

把大型键或索引列表从其切片中分离出来。