aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Shitov <andy@shitov.ru>2021-11-15 09:35:21 +0100
committerAndrew Shitov <andy@shitov.ru>2021-11-15 09:35:21 +0100
commitc4c0ff613a3509c0e2d0078a731d2f6b719bbd96 (patch)
tree02444824c085298a951c7426d2cd8c261055d66b
parent253e59bd48e295150f8dd52a89e77933e34db7d8 (diff)
downloadperlweeklychallenge-club-c4c0ff613a3509c0e2d0078a731d2f6b719bbd96.tar.gz
perlweeklychallenge-club-c4c0ff613a3509c0e2d0078a731d2f6b719bbd96.tar.bz2
perlweeklychallenge-club-c4c0ff613a3509c0e2d0078a731d2f6b719bbd96.zip
ash 139-1 in Raku
-rw-r--r--challenge-139/ash/raku/ch-1.raku7
1 files changed, 7 insertions, 0 deletions
diff --git a/challenge-139/ash/raku/ch-1.raku b/challenge-139/ash/raku/ch-1.raku
new file mode 100644
index 0000000000..bbf4fdf078
--- /dev/null
+++ b/challenge-139/ash/raku/ch-1.raku
@@ -0,0 +1,7 @@
+sub MAIN(*@a) {
+ # This is enough to say the result, but it prints True of False
+ # say [<=] @a
+
+ # But this is to follow the task and print 1 or 0:
+ say +([<=] @a)
+}