This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Test-Simple syncup from Schwern.
[perl5.git] / t / lib / Test / Simple / sample_tests / one_fail.plx
1 require Test::Simple;
2
3 push @INC, 't/lib';
4 require Test::Simple::Catch;
5 my($out, $err) = Test::Simple::Catch::caught();
6
7 Test::Simple->import(tests => 5);
8
9
10 ok(1);
11 ok(2);
12 ok(0);
13 ok(1);
14 ok(2);