Select Code to Download

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

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

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

for ( @a ) {
   {
...
   }
   say;
}

for ( @a ) {
   say;
}