aboutsummaryrefslogtreecommitdiff
path: root/challenge-179
diff options
context:
space:
mode:
authorMohammad S Anwar <mohammad.anwar@yahoo.com>2022-08-23 14:33:57 +0100
committerMohammad S Anwar <mohammad.anwar@yahoo.com>2022-08-23 14:33:57 +0100
commitae0730af6ff5829bdc65d61f5cb4f6aea00c8bc1 (patch)
tree168b867ff094251b38d6aa1dd114c6701bfec787 /challenge-179
parent1ab9d2ac6b8926e556427634cfc01b899f809bc5 (diff)
downloadperlweeklychallenge-club-ae0730af6ff5829bdc65d61f5cb4f6aea00c8bc1.tar.gz
perlweeklychallenge-club-ae0730af6ff5829bdc65d61f5cb4f6aea00c8bc1.tar.bz2
perlweeklychallenge-club-ae0730af6ff5829bdc65d61f5cb4f6aea00c8bc1.zip
- Added solutions by Robert DiCicco.
Diffstat (limited to 'challenge-179')
-rw-r--r--challenge-179/robert-dicicco/perl/ch-1.pl15
-rw-r--r--challenge-179/robert-dicicco/raku/ch-1.raku13
2 files changed, 28 insertions, 0 deletions
diff --git a/challenge-179/robert-dicicco/perl/ch-1.pl b/challenge-179/robert-dicicco/perl/ch-1.pl
new file mode 100644
index 0000000000..f9758424f0
--- /dev/null
+++ b/challenge-179/robert-dicicco/perl/ch-1.pl
@@ -0,0 +1,15 @@
+#!perl.exe
+
+use strict;
+use warnings;
+use Lingua::EN::Numbers qw/num2en_ordinal/;
+
+# AUTHOR: Robert DiCicco
+# DATE: 2022-08-22
+# Challenge 179 Ordinal Number Spelling ( Perl )
+
+my @arr = (11,62,99);
+
+foreach (@arr) {
+ print "$_ => ", num2en_ordinal($_), "\n";
+}
diff --git a/challenge-179/robert-dicicco/raku/ch-1.raku b/challenge-179/robert-dicicco/raku/ch-1.raku
new file mode 100644
index 0000000000..c9a06af2e0
--- /dev/null
+++ b/challenge-179/robert-dicicco/raku/ch-1.raku
@@ -0,0 +1,13 @@
+use v6;
+
+use Lingua::EN::Numbers :short;
+
+# AUTHOR: Robert DiCicco
+# DATE: 2022-08-22
+# Challenge 179 Ordinal Number Spelling ( Raku )
+
+my @arr = 11,62,99;
+
+for @arr {
+ print "$_ => ", ord-n($_), "\n";
+}