redirect all output

mrborisguy has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: redirect all output by Joost (Canon) on Apr 28, 2005 at 14:33 UTC
`open STDOUT,">","some_file.txt" or die "Can't redirect STDOUT: $!"` [download] See also perlopentut "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply] [d/l]
Re: redirect all output by ihb (Deacon) on Apr 28, 2005 at 14:35 UTC
You can duplicate `STDOUT` and then reopen `STDOUT` to something else. `open my $stdout, '>&STDOUT' or die $!; open STDOUT, '>', $file or die $!;` [download] Now everything printed to `STDOUT` ends up in the file given by `$file`. If you want to print to the original `STDOUT` you can do that by doing `print $stdout 'hello';`. See perlopentut for more on this. `ihb` See perltoc if you don't know which perldoc to read!	[reply] [d/l] [select]
Re: redirect all output by blazar (Canon) on Apr 28, 2005 at 14:42 UTC
In addition to the answers you already received, see also select.	[reply]
Re: redirect all output by polettix (Vicar) on Apr 28, 2005 at 14:45 UTC
Note that if you intend to redirect to an in-memory variable (Perl 5.8.x) you have to `close STDOUT` first; from `perldoc -f open`: File handles can be opened to "in memory" files held in Perl scalars via: `open($fh, '>', \$variable) \|\| ..` [download] Though if you try to re-open "STDOUT" or "STDERR" as an "in memory" file, you have to close it first: `close STDOUT; open STDOUT, '>', \$variable or die "Can't open STDOUT: $!";` [download] Flavio (perl -e 'print(scalar(reverse("\nti.xittelop\@oivalf")))') Don't fool yourself.	[reply] [d/l] [select]
Re: redirect all output by tlm (Prior) on Apr 28, 2005 at 14:38 UTC
What I would do is: `open my $hold, '>&', STDOUT or die "Failed to dup STDOUT\n"; open STDOUT, '>', 'output.txt' or die "Failed to re-open STDOUT\n"; # later, if you want to restore STDOUT: open STDOUT, '>&', $hold or die "Failed to restore STDOUT\n";` [download] The only line you really need is the second `open`. The first and the third `open`s are there only in case you want to restore `STDOUT` to its original state. the lowliest monk	[reply] [d/l]