rl..
>
> Thanks.
>
> Wags ;)
> David R. Wagner
> Senior Programmer Analyst
> FedEx Freight Systems
> 1.719.484.2097 Tel
> 1.719.484.2419 Fax
> 1.408.623.5963 Cell
> http://fedex.com/us
>
> >
> > use File::Tee qw(tee);
> >
> > # simp
Uri Guttman wrote:
"SHC" == Shawn H Corey writes:
SHC> Uri Guttman wrote:
>>
>> print <
>> All STDOUT/STDERR will be assigned to this scripts audittrail log!!
>> All STDOUT/STDERR will be assigned to this scripts audittrail log!!
>> All STDOUT/STDERR will be assigned to this scrip
> "SHC" == Shawn H Corey writes:
SHC> Uri Guttman wrote:
>>
>> print <> All STDOUT/STDERR will be assigned to this scripts audittrail log!!
>> All STDOUT/STDERR will be assigned to this scripts audittrail log!!
>> All STDOUT/STDERR will be assigned to this scripts audittrail log!!
qw(tee);
>
> # simple usage:
> tee(STDOUT, '>', 'stdout.txt');
>
> Tony
>
>
>
> ____________
> From: John W. Krahn
> To:
> Sent: Tuesday, 21 July, 2009 8:41:25
> Subject: Re: Having problems getting data back to STDOUT once
Uri Guttman wrote:
""D" == "Wagner, David <--- Senior Programmer Analyst --- CFS"
> writes:
"D> printf "All STDOUT/STDERR will be assigned to this scripts audittrail
log!!\n";
"D> printf "All STDOUT/STDERR will be assigned to this scripts audittrail
log!!\n";
"D> printf "Al
> ""D" == "Wagner, David <--- Senior Programmer Analyst --- CFS"
> > writes:
"D> printf "All STDOUT/STDERR will be assigned to this scripts audittrail
log!!\n";
"D> printf "All STDOUT/STDERR will be assigned to this scripts audittrail
log!!\n";
"D> printf "All STDOUT/S
> -Original Message-
> From: Tony Esposito [mailto:tony1234567...@yahoo.co.uk]
> Sent: Tuesday, July 21, 2009 08:08
> To: beginners@perl.org
> Subject: Fw: Having problems getting data back to STDOUT once
> I assign it to a file
>
> Back to the question at han
Jay Savage wrote:
On Tue, Jul 21, 2009 at 9:25 AM, Shawn H. Corey wrote:
John W. Krahn wrote:
[snip]
close(STDERR);
open(STDOUT , '>') || die "Unable to open STDOUT: $!";
You're not opening STDOUT to anything. And you closed STDERR so the die
message can't go anywhere. In fact
Back to the question at hand - have you tried using 'tee'
use File::Tee qw(tee);
# simple usage:
tee(STDOUT, '>', 'stdout.txt');
Tony
From: John W. Krahn
To:
Sent: Tuesday, 21 July, 2009 8:41:25
Subject: Re: Having problems
On Tue, Jul 21, 2009 at 9:25 AM, Shawn H. Corey wrote:
> John W. Krahn wrote:
[snip]
close(STDERR);
open(STDOUT , '>') || die "Unable to open STDOUT: $!";
>>>
>>> You're not opening STDOUT to anything. And you closed STDERR so the die
>>> message can't go anywhere. In fact
Tony Esposito wrote:
From: John W. Krahn
Shawn H. Corey wrote:
John W. Krahn wrote:
Shawn H. Corey wrote:
Wagner, David --- Senior Programmer Analyst --- CFS wrote:
I am done processing and I want to place the final output
line also on the screen. Here is what I have:
if ( $GlblI
Shawn H. Corey wrote:
John W. Krahn wrote:
Shawn H. Corey wrote:
Wagner, David --- Senior Programmer Analyst --- CFS wrote:
I am done processing and I want to place the final output line
also on the screen. Here is what I have:
if ( $GlblInfo{audit} ) {
printf "\n\n*Shoul
John W. Krahn wrote:
Shawn H. Corey wrote:
Wagner, David --- Senior Programmer Analyst --- CFS wrote:
I am done processing and I want to place the final output line
also on the screen. Here is what I have:
if ( $GlblInfo{audit} ) {
printf "\n\n*Should be last line in the a
Shawn H. Corey wrote:
Wagner, David --- Senior Programmer Analyst --- CFS wrote:
I am done processing and I want to place the final output line
also on the screen. Here is what I have:
if ( $GlblInfo{audit} ) {
printf "\n\n*Should be last line in the audittrail
file...
Wagner, David --- Senior Programmer Analyst --- CFS
asked:
> I have looked at perldoc -f open and tried a number of things. The
> line "should be last line" is appearing in my audittrail file, but I
> never see the EndOfProg or Error in the auditrrail or on the screen.
Try "perldoc -f sele
Wagner, David --- Senior Programmer Analyst --- CFS wrote:
I am done processing and I want to place the final output line also on
the screen. Here is what I have:
if ( $GlblInfo{audit} ) {
printf "\n\n*Should be last line in the audittrail
file...*\n\n";
clo
I am done processing and I want to place the final output line also on
the screen. Here is what I have:
if ( $GlblInfo{audit} ) {
printf "\n\n*Should be last line in the audittrail
file...*\n\n";
close(STDOUT);
close(STDERR);
open(STDOUT , '>')
17 matches
Mail list logo