Select Code to Download

> cpan Path::Tiny
Reading 'C:\Users\jndt\.cpan\Metadata'
...
t/00-report-prereqs.t ............. Can't dup STDOUT:  Bad file descri
+ptor at C:/perl-5.20.3/lib/Test/Builder.pm line 1948.
Compilation failed in require at C:/perl-5.20.3/lib/Test/Builder/Modul
+e.pm line 5.
...

sub _open_testhandles {
    my $self = shift;
...

    return;
}

use strict;
use warnings;
...
open( $Testout, ">&STDOUT" ) or die "Can't dup STDOUT:  $!";
print $Testout "Hello Perl Monks!\n";
__END__