[Dresden-pm] Lazy evaluation

Torsten Knorr create-soft at tiscali.de
Sa Dez 22 11:35:23 PST 2007


Hallo Steffen 

>sub fib
>{
>    my $n = shift;
>    return 1 if $n < 2; # ???
# Die Fibonacci - Zahlen 1 und 2 haben den Wert 1
 return(1) if($n <= 2);

# MfG Torsten