use Test::More 'no_plan';

my $ok_fh      =  'ok.txt';
my $fail_fh    =  'fail.txt';

my $Test = Test::More->builder;
$Test->output($ok_fh);
$Test->failure_output($fail_fh);

ok(1);
ok(0,'bar');