09 05 2007 perl Tweet
フッ君の日常
Perl で
perl -e 'print join "\n", map {!($_%15) ? "FizzBuzz" : \ !($_%5) ? "Buzz" : !($_%3) ? "Fizz" : $_} (1..100)'
書いてみた。
