$a=1;print$a-=$b+=$a*=-1,$/for 0..31 [download]
In reply to (Even Shorter) RE: (5): Fibonnaci by Adam in thread Reaped: Fibonnaci by NodeReaper