aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <Mohammad.Anwar@yahoo.com>2021-11-16 19:03:38 +0000
committerGitHub <noreply@github.com>2021-11-16 19:03:38 +0000
commit9a22bafaaf6fb52a51283577cc5671dfef624903 (patch)
tree89580dc9a6c4a92cd803e752744cf837ebac1bd9
parent428cb0b994d11282ea160574b67e4dbefd3eabbd (diff)
parentc4c0ff613a3509c0e2d0078a731d2f6b719bbd96 (diff)
downloadperlweeklychallenge-club-9a22bafaaf6fb52a51283577cc5671dfef624903.tar.gz
perlweeklychallenge-club-9a22bafaaf6fb52a51283577cc5671dfef624903.tar.bz2
perlweeklychallenge-club-9a22bafaaf6fb52a51283577cc5671dfef624903.zip
Merge pull request #5224 from ash/ash-139
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)
+}