for my $n (2 .. 99) {
  for my $x (2 .. $n - 1) {
    if (0 == $n % $x) {          # py-if branch
      print $n, " is not ";
      goto BREAK;                # py-break
    }
  }
  print $n, " is ";              # py-else branch
 BREAK:
  print  "a prime number\n";
}