Perl编程：输入输出与文件目录操作详解

"Perl语言程序设计：第4章 输入输出与文件目录.ppt" 在Perl编程中，输入输出和文件目录操作是核心功能之一。第四章主要涵盖了如何在Perl中处理输入输出流以及与文件和目录相关的操作。 首先，`<STDIN>`是一个特殊的文件句柄，用于行输入操作。`<>`符号可以代表任何文件句柄的行输入操作，包括`<STDIN>`。`chomp`函数用于去除行尾的换行符。例如，`chomp($line=<STDIN>)`将从标准输入读取一行并去除末尾的换行符。同样的，`chomp(@line=<STDIN>)`会读取多行到数组`@line`中。当到达文件结尾时，行输入操作会返回`undef`，表示文件结束。 在使用`while`循环处理输入时，如果不指定变量，`<STDIN>`会将值读取到预定义变量`$_`中。如`while(<STDIN>)`会读取标准输入的每一行，并将其赋值给`$_`，然后可以在此循环内部进行处理。 钻石操作符`<>`是Perl中的一个强大工具，它可以用来从任何位置读取输入，通常是从文件。在命令行执行时，如果不提供参数，`<>`会默认从标准输入(`STDIN`)读取。当提供文件名作为参数，如`perl myProgram file1 file2 ... fileN`，Perl会将这些文件内容串联起来读取，没有间隔。这些参数存储在特殊数组`@ARGV`中，供`<>`遍历使用。如果`@ARGV`为空，`<>`依然会读取标准输入。 数组`@ARGV`本身是一个普通的Perl数组，支持所有数组操作。如果给`@ARGV`赋值，比如`@ARGV=qw/larry morcurly/;`，那么程序将只读取这些指定的文件，忽略命令行参数。 在`print`函数中，可以用于打印变量、数组等内容。例如，`print @array`将打印数组的所有元素，而`print "@array"`会在元素之间添加空格，形成一个字符串。`print`通常返回1表示打印成功，尽管在实际使用中括号可选。例如，`print("Hello, world!\n")`和`print "Hello, world!\n"`都是有效的。 此外，Perl还提供了`printf`函数，类似于C语言的`printf`，用于格式化输出。`printf`的语法为`printf "格式", 数据1, 数据2, ...`，其中“格式”部分定义了输出的样式，例如 `%d` 表示十进制整数，`%f` 表示浮点数等。这样，你可以精确控制输出的数据格式，以满足各种需求。 Perl通过`<STDIN>`、`<>`、`@ARGV`、`print`和`printf`等工具，提供了灵活且强大的输入输出处理能力，使得程序员能够轻松地与用户交互、读写文件以及处理命令行参数。理解并熟练运用这些概念和函数是Perl编程中的关键步骤。