12、Perl 循环与子例程全解析

Perl 循环与子例程全解析

1. Perl 循环简介

在 Perl 编程中，循环结构为开发者提供了处理重复代码的有效方式。每次循环时，操作的数据可能会发生变化，但处理这些数据的代码保持不变。循环可用于从文件读取数据、从数据库加载数据行，甚至重复提示用户输入正确格式的电话号码。可以通过条件测试来确定是否退出循环，如果测试失败则退出；也可能在循环数据本身处理完毕后自然退出。Perl 提供了两种主要的条件循环命令： foreach 和 while 。

2. foreach 循环

• 语法
  • 对于列表 LIST 中的每个元素，设置变量 VAR 并执行代码块 CODE 。

foreach VAR ( LIST ) {
    CODE;
}

- 代码也可以放在 `foreach` 语句之前。

CODE foreach VAR ( LIST );

- 如果在 `foreach` 循环中使用 `my` 声明 `VAR`，循环结束后 `VAR` 不再可用；如果在 `foreach` 之前声明 `VAR`，循环结束后 `VAR` 保存列表的最后一个值。