Re^3: Test::More to only report fails? (IO::Null)

I get the same results on Active State:

print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Format
+ter/TAP.pm line 156.
print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Format
+ter/TAP.pm line 156.
print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Format
+ter/TAP.pm line 156.
print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Format
+ter/TAP.pm line 156.
print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Format
+ter/TAP.pm line 156.
print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Format
+ter/TAP.pm line 125.
#   Failed test 'FAIL'
#   at C:\Users\xxxx\Documents\PerlProjects\Monks\test.pl line 13.
#          got: '1'
#     expected: '0'
print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Format
+ter/TAP.pm line 125.
# Looks like you failed 1 test of 6.

Process completed with exit code 1
[download]

With:

use strict;
use warnings;
use Test::More;
use IO::Null;
use Data::Dump;

open (my $fh, '>', 'nul') or die "Ooops$!";

Test::More->builder->output($fh);

is($_,$_,"equality $_") for 1..5;

is(1,0,"FAIL"); 

done_testing;

__END__
#   Failed test 'FAIL'
#   at C:\Users\mmtho\Documents\PerlProjects\Monks\test.pl line 13.
#          got: '1'
#     expected: '0'
# Looks like you failed 1 test of 6.
[download]

I guess just check O/S and open either /dev/null or nul.
NUL is a reserved file name on Windows.

Comment on Re^3: Test::More to only report fails? (IO::Null) Select or Download Code


laziness, impatience, and hubris
	PerlMonks