|
|
|
| go ahead... be a heretic | |
| PerlMonks |
Fibonacci numbers with lvaluesby ariels (Curate) |
| on Nov 30, 2000 at 13:14 UTC ( #44096=snippet: print w/replies, xml ) | Need Help?? |
($a,$b) = (0,1); ($a < $b ? $a : $b) = $a+$b for (1..$n); print $n%2 ? $a : $b, "\n"
|
|
||||||||||||||||||||||||||||||