Fibonacci


fibs :: [Int]
fibs = 0 : 1 : [ a + b | (a, b) <- zip fibs (tail fibs)]
Fibonacci

>>29
http://perldoc.perl.org/perlop.html#Named-Unary-Operators-operator%2c-named-unary

and way way way more readable, unless you happen to think dup, swap, rot, tuck and nip are better than lotsa parenthesis
you'd be surprised how many people do.

also, >>30-31 should count every pair of parentheses as a token.

if you're counting characters, that's just stupid. especially when comparing different languages.