本文分享《Perl编程24学时教程》笔记第5课时的内容，介绍下 perl编程中的文件操作。
第5课时 文件操作
一、打开文件
open函数用于打开文件句柄，接受两个参数，第一个是文件句柄，第二个是路径名，若没有完整的路径名，则设法打开当前目录中的文件。成功返回非0值，失败返回undef。
die函数用于停止perl程序的执行，输出信息：Died at scriptname line xxx。可以接受一个参数，用作输出消息。常同open函数连用，open(filehadler, filepath)||died "message $!n";。
warn函数用于发出警告，但不停止程序，接受一个参数，用作输出信息。
$!特殊变量设置为系统需要的最后一个操作的出错信息，数字上下文中返回错误号，文字上下文中返回错误信息。
close函数用于关闭文件句柄。
1，路径名
在window系统中可使用正斜杠代替反斜杠做路径分割符，可使用machinenamesharename。
在Macintosh上，可以使用冒号来连接路径。
2，适当使用die函数
die函数后不跟换行符，则附加"at scriptname line xxx"的字样。
二、读取文件
open(filehandle,"pathname")，以读文件方式打开文件句柄。
<>运算符，接受文件句柄参数，可写入标量和数组。
三、写入文件
四、自由文件、测试文件和二进制数据
1，自由文件句柄
perl程序启动时，自动打开3个文件句柄，STDOUT，STDIN，STDERR，分别是标准输出句柄，标准输入句柄和标准错误句柄。
2，二进制文件
binmode函数将文件句柄标记为二进制文件，接受文件句柄参数。
在不能区分二进制文件和文本文件的系统使用binmode是无害的。
3，文件测试运算符