大佬教程收集整理的这篇文章主要介绍了Perl – while(<>)文件处理，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。
我认为它们在一个文件中连接在一起,工作是逐行的.问题是,我如何知道我正在使用第一个文件？然后与第二个.
对于一个简单的例子,我想在一行中打印文件的内容.
while( <> ){
print "\n" if (it's the second file already);
print $_;
}
while (<>) {
chomp; # remove newline
print; # print the line
print "\n" if eof; # at end of file,print a newline
}
您还可以考虑使用计数器来跟踪正在处理的文件
$counter++ if eof;
请注意,此计数将在文件的最后一行增加1,因此请勿过早使用.
如果你想跟踪行号$.在当前文件句柄中,可以关闭ARGV文件句柄来重置此计数器：
while (<>) {
print "line $. : ",$_;
close ARGV if eof;
}
以上是大佬教程为你收集整理的Perl – while(<>)文件处理全部内容，希望文章能够帮你解决Perl – while(<>)文件处理所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。