Help for this page

Select Code to Download

Select or download this

$ perl -wE'
   my $condition = 0;
...
'
0
1

Select or download this

This is perl 5, version 12, subversion 2 (v5.12.2) built for i686-linu
+x