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:$!"; }