Perl语言入门(第五版) 读书笔记（二）---输入与输出、文件读写

第五章 输入与输出

1. 标准输入<STDIN>

chomp($line=<STDIN>);

while(defined($line=<STDIN>)) {}

foreach(<STDIN>){print $_;}

2. 钻石操作符<> 默认采用@ARGV数组作为输入，如果为空则改为<STDIN>

3. 调用参数列表@ARGV

4. printf() 格式化输入，print/printf不指定流时默认为STDOUT

use 5.010;

say "Hello!"; #say和print一样，但是会自动增加换行符

5. 打开文件句柄

open FH,"$file"; #read, default方式

open FH,"<$file"; #read

open FH,">$file"; #write

open FH,">>$file"; #append

open FH,"+<$file"; #read-update

open FH,"+>", "/root/file"; #write-update

open FH,"+>>", $file; #append-update

open FH, "| cat >hello"; #open pipe

close FD;

5. 用die处理严重错误，die可以输出信息并终止程序

warn和die用法一样，但是不会终止程序

6. 使用文件句柄

1)文件读取的3中方法

按行读，存入标量

while (<FILE>) { print; }

按行读，存入数组

@array = <FILE>;

读入整个文件 ，存入标量

$string = do { local $/; <FILE>; };

2)读文件实例

open (EP,"/etc/passwd");

while (<EP>)

{

chomp;

print "I saw $_ in the password file!\n";

}

3)读写文件实例

open(IN,$a) || die "cannot open $a for reading: $!";

open(OUT,">$b") || die "cannot create $b: $!";

while ($line = <IN>)

{

print OUT $line;

}

close(IN) ;

close(OUT) ;

7. 复用标准文件句柄

select STDERR; #select能改变默认的文件句柄

复用文件句柄时，perl会自动关闭原来的文件句柄。

if (! open STDERR, ">> /var/error.log") #将错误信息写到自定义文件中

{

die "Can't open error log for append:$!";

}