hello guys, seen on facebook today:
https://fbcdn-sphotos-h-a.akamaihd.net/hphotos-ak-frc1/575835_600378583316490_2003314912_n.jpg which is a good excuse for a little perl6 exercice: proove it! my result: say [+] ('a'..'z')\ .pairs\ .map: { 1 + .key if .value ~~ any < m a t h > } i already know i have to get used to the anoying \ at the end of the lines but i'm pretty sure there are plenty ways to make this expression shorter. things i tried to get shorter: * .value ~~ any < m a t h > * ('a'..'z') thanks for any golf demo :) regards -- Marc Chantreux (eiro on github and freenode) http://eiro.github.com/ http://eiro.github.com/atom.xml "Don't believe everything you read on the Internet" -- Abraham Lincoln
