[求助]如果一条print语句就可以把内容写在标准输出显示同时写入打开的文件

brantc

如题。

我的情况是：
1. 需要在标准输出打印
2. 同时需要把在标准输出打印的东西写入一个日志文件。

有没有一条语句就可以搞定啊？
不然我总是print STDOUT "SDFADF" 然后又要写一次 print MY_LOG “SDFADF”

谢谢！

我曾尝试了：
1. 先备份STDOUT/STDERR
2. 重定向STDOUT/STDERR到我的日志文件
3. 现在就可以直接print到我的日志文件，但是此时STDOUT/STDERR在终端就没有东西显示了，郁闷。。。

毛xx总理

都去吃饭了吗?

zzmmgjj

1. if you are dealing with complicated log mechanism, check out

1. Log::Perl4log

复制代码

2. To install your own perl installation and leave system perl along, check out perlbrew

3. system won't return the command output, use qx or `` instead, read the result from qx and `` and write to the file you want.

brantc

回复  jason680


    FAQs里面有你这个问题的答案
Perl_Er 发表于 2011-09-08 13:14

    perl faq5？。。。How do I print to more than one file at once?

Perl_Er

回复 14# jason680


    FAQs里面有你这个问题的答案

brantc

回复  brantc


    你可以先看一下书吗？
Perl_Er 发表于 2011-09-08 12:11

    o(╯□╰)o我在看书的。。。但是问题比较急，所以只好发帖借大家的智慧了，惭愧了。。。

brantc

看来你就好好写你的shell script就好了.
(没看到你用到Perl的地方...)
jason680 发表于 2011-09-08 11:10

    您说得太对了。。。。

Perl_Er

回复 13# brantc


    你可以先看一下书吗？

jason680

。。。。感谢！

但是我还有个问题，想不到好的办法：

因为我想把我在perl 里面执行system( ...
brantc 发表于 2011-09-08 10:59

看来你就好好写你的shell script就好了.
(没看到你用到Perl的地方...)