# from Sébastien Aperghis-Tramoni
# on Sunday 04 March 2007 06:19 am:

>     use Test::More;
>
>     my $tests;
>     plan tests => $tests;
>
>     BEGIN { $tests += n }
>     # paragraph of code with n tests
>
>     BEGIN { $tests += m }
>     # paragraph of code with m tests

Interesting.  What if...

     use More::Tests;

     use More::Tests n;
     # paragraph of code with n tests

     use More::Tests m;
     # paragraph of code with m tests

     no More::Tests; # :-D

--Eric
-- 
If the above message is encrypted and you have lost your pgp key, please
send a self-addressed, stamped lead box to the address below.
---------------------------------------------------
    http://scratchcomputing.com
---------------------------------------------------

Reply via email to