print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Formatter/TAP.pm line 156. print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Formatter/TAP.pm line 156. print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Formatter/TAP.pm line 156. print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Formatter/TAP.pm line 156. print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Formatter/TAP.pm line 156. print() on unopened filehandle GLOB at C:/Perl64/site/lib/Test2/Formatter/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/Formatter/TAP.pm line 125. # Looks like you failed 1 test of 6. Process completed with exit code 1 #### 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.