|
|
|
| Pathologically Eclectic Rubbish Lister | |
| PerlMonks |
neilh's scratchpadby neilh (Pilgrim) |
| on Aug 10, 2004 at 01:51 UTC ( #381434=scratchpad: print w/ replies, xml ) | Need Help?? |
#!/usr/bin/perl -w use strict; my $count=0; while ($count < 20) { my $num; $count > 10 ? $num="" : $num="0"; print "$num$count\n"; $count++; } |
|