Quoting Scott Wiersdorf ([EMAIL PROTECTED]):
> if( $a%2 .. $a-- ) {
> do_something();
> ...
> }
I think my favourite is
if (Vi$a) {
do_something();
}
Adam
PS. Of course, you have to do something like
sub Vi { if ($_[0]) { $_[0]=0; return 1; } else { return 0; } }
somewhere else in your program, but that's a small price to pay for a
splendid obfuscation.
--
Adam Rice -- [EMAIL PROTECTED] -- Blackburn, Lancashire, England
