如果你仅仅想一次打印多个文件,你可以这样做:
for $fh (FH1, FH2, FH3) { print $fh "whatever\n" }
连接一个到多个文件句柄的最简单的方法是使用tee(1)程序(如果你有的话),让它来处理复杂的事情。
open (FH, "| tee file1 file2 file3");
甚至这样写:
# make STDOUT go to three files, plus original STDOUT
open (STDOUT, "| tee file1 file2 file3") or die "Teeing off: $!\n";
print "whatever\n" or die "Writing: $!\n";
close(STDOUT) or die "Closing: $!\n";
否则,你就只有自己写个多行打印的程序了(你自己的tee程序)。你也可以使用Tom Christiansen 的程序,http://www.perl.com/CPAN/authors/id/TOMC/scripts/tct.gz 。这个程序是用perl写的,它提供了更强大的功能。
相关阅读 Mac访问Windows共享文件夹Windows 7正版系统验证方法windows 8.1系统版本号查看方法Windows 8.1系统电话激活时无法输入微软返回代码解决方法Windows 8如何调整屏幕分辨率windows8.1磁盘占用100%解决方法Mac双系统如何删除Boot Camp安装的Windows分区Apple教你如何在Mac 上运行 Windows
热门文章 360随身Wifi 4G版什么怎样提高origin下载速百度收购PPS已敲定!3
最新文章
伊森卡特的消失通关流千牛怎么设置自动回复
增加新功能,S版Moto G喜获Android 4.4.4更鸡肋?谷歌Play Music发布更新版本千牛怎么设置自动回复千牛云盘怎么用
人气排行 xp系统停止服务怎么办?xp系统升级win7系统方office2013安装教程图解:手把手教你安装与同步推是什么?同步推使用方法介绍QQ2012什么时候出 最新版下载VeryCD镜像网站逐个数,电驴资料库全集利用PHP程序设定防止MySQL注入或HTML表单滥web服务器和应用服务器的区别安卓android 系统支持什么视频格式
查看所有0条评论>>