sub XXX
{
   #sub setup params...
   
   for (...) {
       next if $cond1;

       for (...) {
        ...
           last if $cond2;     # next OUTER if $cond2
        ...
           last if $cond3;     # next OUTER if $cond3;
                               # WHAT?
                               # INNER vars do not remain the same
        ...
           return() if $cond4; # same as last OUTER
        ...
           next if $cond5;     # redundant all cndx are next
        ...
        }

        return if $condx6; #early return
    }
    return
}