in reply to Next from inner loop only works "most of the time"
#UNTESTED RESULT: foreach my $wrd(@result) { my %seen; $seen{$_}++ for (split //,lc $_); foreach my $ltr (keys %seen) { next RESULT if ($seen{$ltr} > $master_letter_freq{$ltr +}); } print "$_\n"; }
UPDATE: Thanks to jo37 (below),I now believe that the original code 'should' work.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Next from inner loop only works "most of the time"
by jo37 (Curate) on May 18, 2021 at 16:01 UTC | |
by tobyink (Canon) on May 18, 2021 at 19:07 UTC | |
by GrandFather (Saint) on May 18, 2021 at 22:01 UTC | |
by Anonymous Monk on May 18, 2021 at 23:52 UTC |