diff options
| -rw-r--r-- | challenge-200/mark-anderson/raku/ch-2.raku | 68 |
1 files changed, 34 insertions, 34 deletions
diff --git a/challenge-200/mark-anderson/raku/ch-2.raku b/challenge-200/mark-anderson/raku/ch-2.raku index d8332f7aaf..abe46727e9 100644 --- a/challenge-200/mark-anderson/raku/ch-2.raku +++ b/challenge-200/mark-anderson/raku/ch-2.raku @@ -2,23 +2,23 @@ use Test; is ASCII-Art(200), chomp q:to/END/; - ------- ------- ------- + ----- ----- ----- | | | | | | | | | | - ------- | | | | + ----- | | | | | | | | | | | | | | - ------- ------- ------- + ----- ----- ----- END is ASCII-Art(5280), chomp q:to/END/; - ------- ------- ------- ------- + ----- ----- ----- ----- | | | | | | | | | | | | - ------- ------- ------- | | + ----- ----- ----- | | | | | | | | | | | | | | - ------- ------- ------- ------- + ----- ----- ----- ----- END sub ASCII-Art($n) @@ -26,103 +26,103 @@ sub ASCII-Art($n) my @digits = [ (chomp q:to/END/).split("\n").Array, - ------- + ----- | | | | | | | | | | - ------- + ----- END - + (chomp q:to/END/).split("\n").Array, + - | | | | | - | - | + - END (chomp q:to/END/).split("\n").Array, - ------- + ----- | | - ------- + ----- | | - ------- + ----- END (chomp q:to/END/).split("\n").Array, - ------- + ----- | | - ------- + ----- | | - ------- + ----- END (chomp q:to/END/).split("\n").Array, + - - | | | | - | | - ------- - | + ----- | | + - END (chomp q:to/END/).split("\n").Array, - ------- + ----- | | - ------- + ----- | | - ------- + ----- END (chomp q:to/END/).split("\n").Array, - ------- + ----- | | - ------- + ----- | | | | - ------- + ----- END (chomp q:to/END/).split("\n").Array, - ------- - | + ----- | | | | | + - END (chomp q:to/END/).split("\n").Array, - ------- + ----- | | | | - ------- + ----- | | | | - ------- + ----- END (chomp q:to/END/).split("\n").Array - ------- + ----- | | | | - ------- + ----- | | - ------- + ----- END ]; |