06.Perl -- 文件 *** 作

使用 open 函数打开文件

die 函数

warn 函数

说明：

每次打开句柄后，都要记得关闭

测试文件的必要性

-r read 例如， -r 'file' ： 可以读取'file'文件，则返回为真

-w write 例如， -w $a ： $a 中包含的文件名是可以写入的文件，则返回为真

-eexist 例如， -e 'myfile' ： 'myfile'文件存在，则返回为真

-z zero 例如， -z 'data' ： 'data'文件存在，但是文件为空，则返回为真

-ssize例如， -s 'data' ： 'data'文件存在，则返回'data'的大小(字符个数)

-f file 例如， -f 'novel.txt' ：'novel.txt'是个普通文件（区别于二进制文件、可执行文件等），则为真

-d directory 例如， -d '/tmp' ： '/tmp'是个目录，则为真

-T text 例如， -T 'unkonw' ：'unkonw'为文本文件，则为真

-B bin 例如， -B 'unkonw' ：'unkonw'为二进制文件，则为真

-M 例如， -M 'foo' ： 返回'foo'文件被修改后经过的时间

open FILE, ">$file" or warn"can't open the file"

#以写的方式打开文件，会覆盖掉原来的内容，谨慎 *** 作

@new=qw/how are you/##数组new存放你的新数据

print FILE @new

close FILE