Re: returning to the outer loop

Named blocks should be what you want (code is lightly tested). Generally shouldn’t use single letter var names, even for dummy code and $a and $b should really never be used outside sorting where they have special meaning.

use strict;
use warnings;

my @x = ( ['aaaaa', 'bbbbb', 'ccccc', 'ddddd',],
          ['eeeee', 'fffff', 'ggggg', 'hhhhh',],
          ['iiiii', 'jjjjj', 'kkkkk', 'lllll',], );

my $tolerance = 1;

STEVE:
for my $outer ( 1 .. 5 )
{
  TONY:
    for my $some_x ( @x )
    {
        my $fail = 0;
      BRUCE:
        for my $just_this ( @{$some_x} )
        {
            my $c = "..."; # ... get string for pattern matching here.
            $fail++ if $c =~ /\Q$just_this/;
            next STEVE if $fail > $tolerance;
        }
    }
}
[download]

Update: In anything but straightforward, single-screen-of-code cases, I agree with GrandFather below.

Comment on Re: returning to the outer loop Select or Download Code

Replies are listed 'Best First'.
Re^2: returning to the outer loop by LanX (Saint) on Sep 21, 2018 at 02:19 UTC
> In anything but straightforward, single-screen-of-code cases, What about meaningful lable-names, STEVE? ;-) Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery FootballPerl is like chess, only without the dice}	[reply]
Re^3: returning to the outer loop by Your Mother (Archbishop) on Sep 21, 2018 at 02:42 UTC
Dude… It’s Captain America, Iron Man, and the Hulk. I dare you to find something more meaningful! To me. After six beers, binging all the Marvel movies on Netflix. `#!/usr/bin/env YI-BAM-BE!` [download]	[reply] [d/l]
Re^4: returning to the outer loop by LanX (Saint) on Sep 21, 2018 at 11:42 UTC
> I dare you to find something more meaningful! I am Groot! Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery FootballPerl is like chess, only without the dice}	[reply]
Re^5: returning to the outer loop by Your Mother (Archbishop) on Sep 21, 2018 at 17:02 UTC
Re^6: returning to the outer loop by LanX (Saint) on Sep 21, 2018 at 21:05 UTC
Re^3: returning to the outer loop by GrandFather (Saint) on Sep 21, 2018 at 05:08 UTC
Steve_(atmospheric_phenomenon)? Optimising for fewest key strokes only makes sense transmitting to Pluto or beyond	[reply]
Re^2: returning to the outer loop by stevieb (Canon) on Sep 20, 2018 at 21:59 UTC
Not often I disagree with Your Mother, but I have to here. I find it's always advisable to avoid jumping around whenever possible, and it's always almost possible to avoid doing so per your post here.	[reply]
Re^3: returning to the outer loop by Your Mother (Archbishop) on Sep 20, 2018 at 22:29 UTC
But I’d already updated to say GrandFather’s approach was better before you posted… sniff sniff* :'{ So, you really did agree! :P	[reply]


Pathologically Eclectic Rubbish Lister
	PerlMonks