Y: for my $y ( ... ) {
   X: for my $x ( ... ) {
      next Y;
   }
}