19、Perl 数据输入输出全解析

Perl 数据输入输出全解析

1. 循环标签与goto语句

在 Perl 编程中，循环标签有时能让代码更易读。例如在嵌套循环里：

next OUTER if $j > $i; print “$i vs $j\n”;

这里在内部for循环中使用了next OUTER，它的意思是“跳转到名为OUTER的循环的下一次迭代”。不过，若频繁使用循环标签，代码可能会变得混乱，不确定时最好不用。

goto语句在 Perl 里很少用，每编写约 1000 个程序可能才会用到一次。示例如下：

goto BLOCK_OF_DOOM if $something_terrible; BLOCK_OF_DOOM: { # do something really important }

2. 数据输入输出基础

以往，程序常通过命令行参数来引入外部数据，这对简单脚本可行，但并非常见的数据接收方式。更常见的是从文件中读取外部数据，而 Perl 读取文件非常简单。

2.1 从命令行指定的文件读取数据

用 Perl 读取文件，最简单的方法是在脚本后指定文件名，文件名会被添加到@ARGV数组中，这样就能使用<&