use Test::More 'no_plan';
use Test::Exception;

lives_ok {
	my $x= new blahblah;
	$x->foo (5000);
	$x->bar(200);
	my $ot= output_test->new ("out1");
	my $outfile= $ot->openout();
	$x->emit ($outfile);
	$ot->ok_files_match();
} 'test case out1 worked';

# ... etc ...