Re^3: Fibo Golf challenge on 3 monkeys

I can shave off a couple characters by leveraging the fact that the length of the sequence is even. Also, the OP's sequence starts with F1=1, so if I start there too I don't have to initialize both variables.

perl -e '$a=1;for(A..J){print$a+=$b,$/,$b+=$a,$/}'
[download]

Update: Now that the loop is down to 1 statement I can switch to a postfix for. I can also fold the initialization into the loop.

perl -e 'print$a+=$b||1,$/,$b+=$a,$/for A..J'
[download]

... and if you feel strongly about starting with F0=0,

perl -e 'print$a+=$b,$/,$b+=$a||1,$/for A..J'
[download]

Comment on Re^3: Fibo Golf challenge on 3 monkeys Select or Download Code

Replies are listed 'Best First'.
Re^4: Fibo Golf challenge on 3 monkeys by Anonymous Monk on Jul 15, 2007 at 20:51 UTC
`perl -le'print$a+=$b,$/,$b+=$a\|\|1for A..J'` [download]	[reply] [d/l]