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

Reply via email to