sub blah {
 ...
 foreach my $b (@blah) {
  foreach my $y (@yuck) {
    ...
    if ($something) {return;}
    ...
  }
 }
}