#对文件引用进行声明, 文件路径可以为绝对路径(如: E:\\studyPerl\\a.txt);也可为相对路径(如:a.txt),在执行时解析器会去当前perl文件所在的目录下查找该文件(a.txt)
$filename = "a.txt";#相对路径
语法为 -op expr 如示例
$filename = "a.txt";#相对路径
if(-e $filename) {
print "file $filename exists";
}
操作符 | 简单描述 |
-e | 是否存在 |
-d | 是否为目录 |
-f | 是否为普通文件 |
-r | 是否可读 |
-w | 是否可写 |
-z | 是否为空文件 |
-B | 是否为二进制文件 |
-T | 是否为文本文件 |
<1> 打开的语法为 open FILEHANDLE,MODE,EXPR
其中: FILEHANDLE 表示文件操作的句柄
MODE 表示 操作文件的方式,方式有三种:(1) < 表示读取; (2) > 表示写入并覆盖文件之前的内容 ; (3) >> 表示写入并把写入的内容追加到原文件的尾部
EXPR 表示文件的路径
<2> 关闭的语法为 close FILEHANDLE
其中: FILEHANDLE 表示之前打开的文件句柄
<3> 示例
file.pl
$fHandle = undef; #在成功打开文件后会赋值
$filename = "a.txt";
#读取文件a.txt
open ($fHandle ,"<",$filename) or die "$0:could not open $filename : $!";
# 如果打开失败, 则会执行die后面的语句, 并且程序会终止执行.
# E:\studyPerl\file.pl:could not open a.txt : No such file or directory at E:\studyPerl\file.pl line 4.
#关闭文件
close($fHandle);