1N/Arequire Test::Simple;

1N/A

1N/Apush @INC, 't/lib';

1N/Arequire Test::Simple::Catch;

1N/Amy($out, $err) = Test::Simple::Catch::caught();

1N/A

1N/ATest::Simple->import(tests => 5);

1N/Aclose STDERR;

1N/A

1N/Aok(1);

1N/Aok(1);

1N/Aok(1);

1N/Aok(1);

1N/Aok(1);

1N/A

1N/Adie "Almost there...";