Hi,

There is no other simple way? To print the STDERR and STDOUT to log file and to the console on threat?
Something like the following:

open(LOG, "> $LOG_FILE") || die "Can't redirect stdout";
#open(STDERR, ">&LOG")   || die "Can't dup stdout";
    
open (CMD, " ls |");

while (<CMD>)
{
    lprint ($_)
}

close(CMD);

sub lprint ()
{    
    my ($line) = @_;
    print LOG $line;    
#    print STDERR $line;
#    print STDERR $_;
    print $line;
}
[download]

The problem with the example above is that I can’t catch an error messages (STDERR) and print them to log file and the console.
Any Idea how to handle the STDERR as well?

Thanks.