44、Perl 变量作用域指南与模块创建

Perl 变量作用域指南与模块创建

1. 复杂程序的变量作用域指南

1.1 使用参数将数据传递给子例程

在前面的指南措施生效后，用户定义的变量不会意外泄漏到脚本末尾定义的子例程中。不过，那些依赖数据泄漏的子例程会突然产生 “Use of uninitialized value on line X” 消息，这意味着需要修改对子例程的调用，将所需数据作为参数传递。

1.2 使用 local 本地化内置变量的临时更改

local 声明会在执行离开声明作用域时自动恢复变量的早期值。为利用这一特性，可将对 Perl 内置变量的临时更改放在花括号内，并使用 local 声明这些变量，示例如下：

{
  local  $,="\t";
  print  @items_getting_tab_separation;
}  
# $, now reverts to value it had before "\t" was assigned
print @items_not_getting_tab_separation;

这样做可避免因临时更改未正确撤销而导致的问题，节省调试时间。

1.3 采用用户定义的循环变量

对于嵌套循环，为避免内层循环掩盖外层循环的 $_ 值，可按以下方式将用户定义的循环变量设为私有：
| 原循环类型 | 修改后循环类型 |
| — | — |