On 7/20/06, A. Pagaltzis <[EMAIL PROTECTED]> wrote:
use Test::More;plan tests => my $tests; { require_ok( 'MyModule' ); my $obj = MyModule->new(); isa_ok( $obj, 'MyModule' ); } BEGIN { $tests += 3 }
Pretty sneaky. This is now in the FAQ. http://perl-qa.yi.org/index.php/Test::FAQ