大佬教程收集整理的这篇文章主要介绍了perl – 如何一次打印成两个文件？，大佬教程大佬觉得挺不错的，现在分享给大家，也给大家做个参考。
for my $fh (FH1,FH2,FH3) { print $fh "whatever\n" }
我在perldoc找到它但它对我不起作用.
我到目前为止的代码是：
@H_786_2@my $archive_dir = '/some/cheesy/dir/'; my ($stat_file,$stat_file2) = ($archive_dir."file1.txt",$archive_dir."file2.txt"); my ($fh1,$fh2); for my $fh (fh1,fh2) { print $fh "whatever\n"; }我在(fh1,fh2)部分出现“Bareword”错误,因为我使用严格.我也注意到他们错过了一个;在这个例子中,所以我猜可能会有更多的错误.
一次打印到两个文件的正确语法是什么？
请注意,我没有使用裸字.在过去,你会使用：
open(FH1,">$stat_file"); ... for my $fh (FH1,FH2) { print $fh "whatever\n"; }
但现代的方法是前者.
以上是大佬教程为你收集整理的perl – 如何一次打印成两个文件？全部内容，希望文章能够帮你解决perl – 如何一次打印成两个文件？所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错，欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供，作为学习参考使用，版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ：384754419，请注明来意。