diff options
| author | Luca Ferrari <fluca1978@gmail.com> | 2020-08-17 15:15:21 +0200 |
|---|---|---|
| committer | Luca Ferrari <fluca1978@gmail.com> | 2020-08-17 15:15:21 +0200 |
| commit | d4ae043c3471d42a48b0e5f680ec36824c2e6dfb (patch) | |
| tree | 22d9f4ddfa93aa2fe8229cbd29cc096c5c15b186 | |
| parent | ec6a2b9cf566b1cd53c18cbbf85b171b4656e861 (diff) | |
| download | perlweeklychallenge-club-d4ae043c3471d42a48b0e5f680ec36824c2e6dfb.tar.gz perlweeklychallenge-club-d4ae043c3471d42a48b0e5f680ec36824c2e6dfb.tar.bz2 perlweeklychallenge-club-d4ae043c3471d42a48b0e5f680ec36824c2e6dfb.zip | |
Fixed missing parameter.
| -rw-r--r-- | challenge-074/luca-ferrari/raku/ch-2.p6 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-074/luca-ferrari/raku/ch-2.p6 b/challenge-074/luca-ferrari/raku/ch-2.p6 index 0ce2abe239..e8ea2d376f 100644 --- a/challenge-074/luca-ferrari/raku/ch-2.p6 +++ b/challenge-074/luca-ferrari/raku/ch-2.p6 @@ -23,7 +23,7 @@ sub MAIN( Str $S where { $S.chars > 2 } ) { %counting{ $_ }++ for $S.substr( 0 .. $index ).comb( '', :skip-empty ); my $fnr = $S.substr( 0 .. $index ) .comb( '', :skip-empty ) - .first( { %counting{ $_ }:exists && %counting{ $_ } == 1 } ) + .first( { %counting{ $_ }:exists && %counting{ $_ } == 1 }, :end ) // '#'; @result.push: $fnr; |