chen li schreef:

> for ($k; $k>=1;$k--) {$result*=$n--;}

Alternative:

  $result *= $n-- for 1..$k ;

-- 
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>


Reply via email to