diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2020-11-23 19:52:50 +0000 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2020-11-23 19:52:50 +0000 |
| commit | a0d4f937b58c71ec899c20cd4adb407290ee1c1f (patch) | |
| tree | 8f41456190405540cacb003c1d1348402434dc94 /challenge-087 | |
| parent | bcc5415d3e812b3dd52027ee5fd72e11d31ac61d (diff) | |
| parent | 510dffb1e2e9e6607c41944f1ee9564f146b2829 (diff) | |
| download | perlweeklychallenge-club-a0d4f937b58c71ec899c20cd4adb407290ee1c1f.tar.gz perlweeklychallenge-club-a0d4f937b58c71ec899c20cd4adb407290ee1c1f.tar.bz2 perlweeklychallenge-club-a0d4f937b58c71ec899c20cd4adb407290ee1c1f.zip | |
Merge pull request #2834 from juliodcs/juliodcs-week87
Minor tweak
Diffstat (limited to 'challenge-087')
| -rw-r--r-- | challenge-087/juliodcs/raku/ch-2.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-087/juliodcs/raku/ch-2.raku b/challenge-087/juliodcs/raku/ch-2.raku index 04e9390855..86e9f9f6cb 100644 --- a/challenge-087/juliodcs/raku/ch-2.raku +++ b/challenge-087/juliodcs/raku/ch-2.raku @@ -16,7 +16,7 @@ sub largest-rectangle-v1($matrix) { my $max-offset = $matrix.split(/\s+/).head.chars.pred; for 0 .. $max-offset -> $offset { my $ones = ''; - for $matrix ~~ m:g/^^ \d**{$offset} (1+) {$ones=$0} (\d*\s+) <?before \d**{$offset} $ones> / { + for $matrix ~~ m:g/^^ \d**{$offset} (1+) {$ones=$0} \d*\s+ <?before \d**{$offset} $ones> / { $max = $_[0].chars if $max < $_[0].chars } } |