PERL练习汇总

1.1 读入file，将序列变成一行输出。 use strict; #报错语句 use warnings; open (FA,"file") or die $!; #打开文件句柄 open (FB,">file1") or die $!; while (<FA>){ chomp; print FB $_; } print FB "\n"; #我写的 #!/usr/bin/p

>>阅读原文<<