for my $each_num (2 .. sqrt $prime_candidate) {
    if ($prime_candidate % $each_num == 0) {
        say ...