aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLuca Ferrari <fluca1978@gmail.com>2023-05-15 07:59:00 +0200
committerLuca Ferrari <fluca1978@gmail.com>2023-05-15 07:59:00 +0200
commitcbacf4a375d577a64c304a3bf314963fd158430a (patch)
treec318b09353491b354fc25792114a439839bc51ea
parent59992dd5227d033495986e2856e218878dc930ff (diff)
downloadperlweeklychallenge-club-cbacf4a375d577a64c304a3bf314963fd158430a.tar.gz
perlweeklychallenge-club-cbacf4a375d577a64c304a3bf314963fd158430a.tar.bz2
perlweeklychallenge-club-cbacf4a375d577a64c304a3bf314963fd158430a.zip
Task 1 done
-rw-r--r--challenge-217/luca-ferrari/raku/ch-1.p612
1 files changed, 12 insertions, 0 deletions
diff --git a/challenge-217/luca-ferrari/raku/ch-1.p6 b/challenge-217/luca-ferrari/raku/ch-1.p6
new file mode 100644
index 0000000000..a124f2d0a5
--- /dev/null
+++ b/challenge-217/luca-ferrari/raku/ch-1.p6
@@ -0,0 +1,12 @@
+#!raku
+
+#
+# Perl Weekly Challenge 217
+# Task 1
+#
+# See <https://perlweeklychallenge.org/blog/perl-weekly-challenge-217/>
+#
+
+sub MAIN( *@n where { @n.grep( * ~~ Int ).elems == @n.elems } ) {
+ @n.sort()[ 3 ].say;
+}