FizzBuzzとの3か月(25)

お世話になっております。

今日は、Perlで実装してみました。
実は、何年も前にPerlで掲示板を実装したことがあります。初めて書いたプログラムらしいプログラムでした。

以下、コードです。

for($x = 0; $x < 100; $x++){
        $y = $x + 1;
        if(($y % 3 == 0) && ($y % 5 == 0)){
                print "FizzBuzz\n";
        }elsif($y % 3 == 0){
                print "Fizz\n";
        }elsif($y % 5 == 0){
                print "Buzz\n";
        }else{
                print $y;
                print "\n";
        }
}

以前は気になりませんでしたが、＄が多いのは異様な感じがします。

以上