FizzBuzzプログラムを書くのが流行っているみたいなので私も参加してみることに。 Perl部門 1. 目指せ最短 (perl -eも含めて56byte) perl -e’die+map{(Fizz)[$_%3].(Buzz)[$_%5]||$_,$/}1..1e2′ ※ perl -lオプションを使わずに最短を目指す。標準エラー出力がNGの場合はprintを使って57byteに perl -e’print+(Fizz)[$_%3].(Buzz)[$_%5]||$_,$/for 1..1e2′ ※ anarchy golf – FizzBuzz で換算すると48byteでPerl最短 (perl -eを含めない) print+(Fizz)[$_%3].(Buzz)[$_%5]||$_,$/for 1..1e2 これだと perl FizzBuzz.pl と実行できて Code Golf