- or download this
use warnings;
...
my $cmd = `fw logexport -i $logfile -o $elogfile -r 1000 -n`;
untie *STDOUT; # Use this to return STDOUT to normal
print "my output='$output'"
- or download this
D:\scripts>perl temp.pl
...
uninitialized value in concatenation (.) or string at temp.pl line 15.
my output=''
- or download this
use warnings;
use strict;
...
my $line = $capture->read;
print "$line";
- or download this
D:\scripts>perl temp.pl
...
file specified. Error retreaving captured text in
IO::Capture::Stdout at temp.pl line 16
Use of uninitialized value in string at temp.pl line 19.