文件和文件夹一 打开/关闭文件
open(file_handle,"file_path")
close(file_handle)
二 读文件
语句＄line = <MYFILE>;从文件中读取一行数据存储到简单变
量＄line中并把文件指针向后移动一行。
语句@array = <MYFILE>;把文件的全部内容读入数组@array，
文件的每一行(含回车符)为@array的一个元素。
三 写文件
open(file_handle,">file_patch")写入的数据覆盖原先的数据
open(file_handle,">>file_patch")写入的数据追加原先的数据后
写入
print file_handle data
四 文件测试
语法 if（-para file）
para有如下几种：
-b 是否为块设备
-c 是否为字符设备
-d 是否为目录
-e 是否存在
-f 是否为普通文件
-g 是否设置了setgid位
-k 是否设置了sticky位
-l 是否为符号链接
-o 是否拥有该文件
-p 是否为管道
-r 是否可读
-s 是否非空
-t 是否表示终端
-u 是否设置了setuid位
-w 是否可写
-x 是否可执行
-z 是否为空文件
-A 距上次访问多长时间
-B 是否为二进制文件
-C 距上次访问文件的inode多长时间
-M 距上次修改多长时间
-O 是否只为“真正的用户”所拥有
-R 是否只有“真正的用户”可读
-S 是否为socket
-T 是否为文本文件
-W 是否只有"真正的用户"可写
-X 是否只有"真正的用户"可执行
五 打开/关闭目录
opendir(dir_handle,"patch")
close(dir_handle)
六 读取目录
@file=readir(dir_handle)
