fizzbuzzを初めて使ったperlで書いてみる

O沼さんに言われたfizzbuzzをperlで書いてみた。
やること簡単なのに初めての言語だと15分くらいかかってしまった。
elseifって書いちゃう癖が。。。

for ($i=1; $i<=100; $i++) {
if(($i % 3) == 0){
if(($i % 5) == 0){
print "fizzbuzz\n";
}else{
print "$i\n";
}
}elsif(($i % 5) == 0){
print "buzz\n";
}else{
print "$i\n";
}
}