PerlでワンライナーFizzBuzz

はじめに

Perlが一番好きな言語なのに、Perlの記事書いたこと無いじゃんということで2年くらいだらだら考えてたFizzBuzzを残しておきます。
三項演算子の戻り値や、printまわりをもう少し頑張ればもう2文字位頑張れそうですね...

改行なし

print(($_%3?"":Fizz).($_%5?"":Buzz)or$_)for 1..100

改行なしなので数字やFizzBuzz同士がくっついちゃっています。
なんかズルい気もする。
後置forは最高ですね。

改行あり

print((($_%3?"":Fizz).($_%5?"":Buzz)or$_)."\n")for 1..100

sayとか使えたらもっと短くなると思うんですけど-Eオプションがいる（もしくは、useでバージョン指定する）のでちょっとずるいし、エラーが出てprintみたいにはいきませんでした。やっぱり、改行が鬼門ですね...

最後に

やっぱりPerlは最高ですね。FizzBuzz楽しい。
こうしたほうが良いとか、Perlでもっと短くかけるとかあったらぜひコメント下さい（懇願）