Select Code to Download

#!/usr/bin/perl
use warnings;
...
        say $n, ' is a primer number';
    }
}

for my $n (2 .. 99) {
    my $is_prime = 1;
...

    say $n, ' is a primer number' if $is_prime;
}