读取文件
- 使用文件输入操作符读入文件
尖括号运算符，钻石符 - 语法
open(FILE,"filename") || die "Can't open';
$line =<FILE> #读取文件
说明：
- 尖括号运算符读取文件的第一行输入
- 读完返回undef
- 多行内容要用循环结构读取
open(FILE,"filename") || die "Can't open';
while($a=<FILE>)
{
print $a;
}
- 也可以利用数组读取
- 但只适合用于小文件，否则会很占内存，运行非常慢
open(FILE,"filename") || die "Can't open';
my @array =<FILE>;
print @array;
写入文件
- 语法
open(FILE,">pathname") #覆盖写入
open(FILE,">>pathname")) #追加写入
- 写入具体内容：print函数
- 语法:
print FILE "abc";
print FILE $a;
print FILE @array;
关闭文件句柄
- 用完就关闭是良好习惯
- 语法
close(FILE)
二进制文件的读写
- 仅存在于windows中
- perl不知道文本文件和二进制文件的区别
-
如需写入二进制数据（GIF/EXE/MS Word），使用binmode
例子
网友评论