オリジナルです。【歌詞】map{sing($_%15==0?'fizzbuzz' : $_%3==0?'fizz' : $_%5==0?'buzz' : $_)}1..60;※お手持ちのPerl環境で実行してください。(sing関数はご自分で実装してください。)
http://www.nicovideo.jp/watch/sm29216429