If you want to do the same thing without relying on an external program, you
can just create a Tee function:
Tee("This should print to the screen and a file.\n");
sub Tee{
open(OUTFILE,">myfile.txt");
print @_;
print OUTFILE @_;
close OUTFILE;
}
-----Original Message-----
From: Troy May [mailto:[EMAIL PROTECTED]]
Sent: Thursday, September 05, 2002 8:19 PM
To: Wiggins d'Anconia
Cc: Perl Beginners
Subject: RE: Redirecting STDOUT
I think I found it! Read this:
|tee - Tee allows for the stdout to be sent to both the screen and to a file
"command |tee outfile"
Does this make sense?
-----Original Message-----
From: Wiggins d'Anconia [mailto:[EMAIL PROTECTED]]
Sent: Thursday, September 05, 2002 7:06 PM
To: Troy May
Cc: Perl Beginners
Subject: Re: Redirecting STDOUT
You could open a file from within the script, then for each of your
prints, print both to the open filehandle and also to standard out.
This should work though I would imagine (hope) there is a better way.
http://danconia.org
Troy May wrote:
> I'm writing a script that is currently interactive ( once I'm done
debugging
> it will be non-interactive) in that I have to tell it to keep processing
> data after the end of every pass. I'm looking for a way to display the
> script's output on my screen, but also to log it to a file if possible. I
> know by using '>' I can redirect, but it doesn't display on the screen if
I
> take this approach.
>
> Any suggestions?
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
