- or download this
open OLDERR, '>&STDERR' or croak "cannot dup stderr: $!";
open STDERR, '>&STDOUT' or croak "cannot redirect stderr to stdout:
+$!";
- or download this
if (my $fh = new IO::File '-|') { ...
- or download this
package NVC::Log::STDERR;
use strict;
...
my $self = shift;
$log->die(join '', @_);
}