"Dr.Ruud" schreef:
> $\=$,="0$/";print 0..100;
00ps. Here some that don't start with "00":
$,="0$/";print"",1..100,"";
print map{$_*10,$/}0..100;
map{print$_*10,$/}0..100;
print$_*10,$/for 0..100;
print$_*10,$/for+0..100;
print$_*10,$/for-0..100;
print$_*10,$/for$|..100;
print$_*10,$/for""..100;
0 remains special:
$# = "%g\n" ; print -2 .. 2 ;
(perlvar: Use of $# is deprecated.)
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>