-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 Ovid wrote:
> sub some_test_case : Test(3) { my $test = shift; # same as $self, > actually ok some_func(); ok another_func(), 'awesome'; is $answer, > 42; } Also for those of us who are fed up with counting tests manually: sub some_test_case : Tests { # Same as above... } Or if you don't feel like going OO with your tests, TIMTOWTDI thanks to Test::Group: test "testing something" => sub { ok some_func(); ok another_func(), 'awesome'; is $answer, 42; }; Produces 1..1 ok 1 # testing something > > It's also easier to organize tests and you can inherit tests, too Well, Test::Class undoubtedly is better for some things :-) - -- Dominique QUATRAVAUX Ingénieur senior 01 44 42 00 08 IDEALX -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.1 (GNU/Linux) Comment: Using GnuPG with Thunderbird - http://enigmail.mozdev.org iD8DBQFEo96rMJAKAU3mjcsRAixjAJ9G9Mb9tWvdue2suiGN6UX8ZsFHTwCgl094 QFuzjjbcZt4a1zcixfHx6sQ= =IK2E -----END PGP SIGNATURE-----