One quick and dirty solution that I've used for some debugging in the
past is to create a subroutine called PrintOut();
###############################
use strict;
use warnings;
open(OUTFILE,">mylog.txt") || die;
PrintOut("Hello World\n");
sub PrintOut{
print @_;
print OUTFILE @_;
}
###############################
-----Original Message-----
From: Larry Guest [mailto:[EMAIL PROTECTED]
Sent: Friday, January 16, 2004 5:03 PM
To: [EMAIL PROTECTED]
Subject: Redirect stdout, stderr to file and stdout
What I need to do now is not only have is display information to STDERR
and STDOUT but also write the same information I see when I run the
command to a file.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
