in reply to redirect all output

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?"

In Section Seekers of Perl Wisdom