diff options
| author | holli-holzer <holli.holzer@gmail.com> | 2019-09-25 22:07:40 +0200 |
|---|---|---|
| committer | holli-holzer <holli.holzer@gmail.com> | 2019-09-25 22:07:40 +0200 |
| commit | 3ea4c71923fa3efa6126bb82f6478c54f02208e4 (patch) | |
| tree | 095f983eef6db7289c5d825708db817dfeed847d /challenge-026/arne-sommer/perl6/stringcounter-map-oneliner | |
| parent | fb785b17a1358135bf6d1a366c2c4df59b419091 (diff) | |
| parent | 38173c385fb4c04bfc50cdf40fee15e8cb6901e1 (diff) | |
| download | perlweeklychallenge-club-3ea4c71923fa3efa6126bb82f6478c54f02208e4.tar.gz perlweeklychallenge-club-3ea4c71923fa3efa6126bb82f6478c54f02208e4.tar.bz2 perlweeklychallenge-club-3ea4c71923fa3efa6126bb82f6478c54f02208e4.zip | |
Merge remote-tracking branch 'upstream/master'
Diffstat (limited to 'challenge-026/arne-sommer/perl6/stringcounter-map-oneliner')
| -rwxr-xr-x | challenge-026/arne-sommer/perl6/stringcounter-map-oneliner | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/challenge-026/arne-sommer/perl6/stringcounter-map-oneliner b/challenge-026/arne-sommer/perl6/stringcounter-map-oneliner new file mode 100755 index 0000000000..a0e6945ef4 --- /dev/null +++ b/challenge-026/arne-sommer/perl6/stringcounter-map-oneliner @@ -0,0 +1,6 @@ +#! /usr/bin/env perl6 + +say @*ARGS[0].comb.unique.map( { @*ARGS[1].comb.grep(* eq $_ ) } ).sum; + + + |