Scott Wiersdorf:
> if( $a%2 .. $a-- ) {
I don't understand this. You see, if $a-- leaves $a as false, then:
if ($a--)
is the shortest way of solving the problem. And if not, then your
code above won't work:
% perl -le '$a=2;if( $a%2 .. $a-- ) {print "Hi"}; print $a'
2
(2 is, you will note, a true value)
But sticking to the spirit of the game:
% perl -le '$a=2; if ($a..($a=0)) { print "Hi" }; print $a'
Hi
0
--
About the use of language: it is impossible to sharpen a pencil with a blunt
ax. It is equally vain to try to do it with ten blunt axes instead.
-- Edsger Dijkstra
