Help for this page

Select Code to Download

Select or download this

>perl -wMstrict -le
"for my $s (qw(0000.76 000.76 00.76 0.76 .76)) {
...
 print 'aok';
"
aok