diff options
| author | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-08-25 00:46:31 +0200 |
|---|---|---|
| committer | Markus "Holli" Holzer <holli.holzer@gmail.com> | 2020-08-25 00:46:31 +0200 |
| commit | ebfd49c876ac5607dda2bcac3a74e92859c00daa (patch) | |
| tree | 31b8478da4127839ee428c1d6a9a1c4b09a95a0a /challenge-075/markus-holzer | |
| parent | 715d360948f5afa3f024dd076cde74e2ae5c5b04 (diff) | |
| download | perlweeklychallenge-club-ebfd49c876ac5607dda2bcac3a74e92859c00daa.tar.gz perlweeklychallenge-club-ebfd49c876ac5607dda2bcac3a74e92859c00daa.tar.bz2 perlweeklychallenge-club-ebfd49c876ac5607dda2bcac3a74e92859c00daa.zip | |
bonus
Diffstat (limited to 'challenge-075/markus-holzer')
| -rw-r--r-- | challenge-075/markus-holzer/raku/ch-2.bonus.raku | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/challenge-075/markus-holzer/raku/ch-2.bonus.raku b/challenge-075/markus-holzer/raku/ch-2.bonus.raku new file mode 100644 index 0000000000..2d669e62cf --- /dev/null +++ b/challenge-075/markus-holzer/raku/ch-2.bonus.raku @@ -0,0 +1,5 @@ +my @A = (2, 1, 4, 5, 3, 7); + +.join(" ").say for reverse [Z] + (" ", "-", |(1..@A.max) ), + |@A.map({ $_, "-", |("#" xx $_), |(" " xx (@A.max - $_)) }); |