diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2019-08-12 14:50:12 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2019-08-12 14:50:12 +0100 |
| commit | c84c73de91f2f6a201a07540d627448aa6304d33 (patch) | |
| tree | 14694d06422bbc7185aa6da6433f9c77bf7b8184 /challenge-020 | |
| parent | 82fa944ce1e0bc82d2729ba9acbf973ded89ec8b (diff) | |
| download | perlweeklychallenge-club-c84c73de91f2f6a201a07540d627448aa6304d33.tar.gz perlweeklychallenge-club-c84c73de91f2f6a201a07540d627448aa6304d33.tar.bz2 perlweeklychallenge-club-c84c73de91f2f6a201a07540d627448aa6304d33.zip | |
- Added solution by Jo Christian Oterhals.
Diffstat (limited to 'challenge-020')
| -rw-r--r-- | challenge-020/jo-christian-oterhals/perl6/ch-1.sh | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/challenge-020/jo-christian-oterhals/perl6/ch-1.sh b/challenge-020/jo-christian-oterhals/perl6/ch-1.sh new file mode 100644 index 0000000000..76d0a219a2 --- /dev/null +++ b/challenge-020/jo-christian-oterhals/perl6/ch-1.sh @@ -0,0 +1 @@ +my $a = @*ARGS[0] and say join "\n", do for $a.comb.squish -> $b { $a ~~ s/^ ($b+) //; } or say "String expected as CLI parameter." |