fizzbuzz. can I have a cookie now?

fizzbuzz.perl

#!/usr/bin/perl
use warnings;
use strict;
use feature 'say';


for (my $i = 1; $i <= 100; $i++) {
        if ($i % 15 == 0 ) {  say "fizzbuzz";   }
        elsif ($i % 3 == 0 ) {  say "fizz";     }
        elsif ($i % 5 == 0 ) {  say "buzz"; }
        else { say $i; }
        }#end for

!/usr/bin/perl

use warnings;
use strict;
use feature 'say';

for (my $i = 1; $i <= 100; $i++) {
my $string = '';
if ($i % 3 == 0) { $string .= 'fizz'; }
if ($i % 5 == 0) { $string .= 'buzz'; }
if (length($string)==0 ) { say $i; }
else { say $string; }
}#end for