Re: a safer way to use no_plan?

[Eric Wilhelm]

# from A. Pagaltzis
# on Sunday 04 March 2007 12:42 pm:

>* Eric Wilhelm <[EMAIL PROTECTED]> [2007-03-04 08:20]:
>> It's a substitute for
>>
>>  use Test::More (0 ? 'no_plan' : (tests => 202));
>>
>> ... mostly because I don't like the number of parens in that.
>
>Uh?
>
>    use Test::More 0 ? 'no_plan' : ( tests => 202 );

  Search pattern not terminated at uh.pl line 1.

I think you meant:

  use Test::More 0 0 ? (tests => 202 ) : 'no_plan', {
           q   (  o  ) =>                '
                 \_/                     '
                                         }
                                         ;

Then, to turn off the plan, I'll just do:

  use constant X => 1;
  use Test::More 0 X ? (tests => 202 ) : 'no_plan', {
           q   (  o  ) =>                '
                 \_/                     '
                                         }
                                         ;

--Eric
-- 
  use warnings;
  use strict;
  use constant X => 1;
  use Test::More 0 X ? (tests => 42 ) : join('', 'n', map
  {split}  q   (  o  ) =>  qw/_ p l a n/), q(
                 \_/    careful or you'll plan your eye out );