aboutsummaryrefslogtreecommitdiff
path: root/challenge-100
diff options
context:
space:
mode:
authorPaulo Custodio <pauloscustodio@gmail.com>2021-11-03 16:10:13 +0000
committerPaulo Custodio <pauloscustodio@gmail.com>2021-11-03 16:10:13 +0000
commitd12a3c58624c219f252e34b926797aa1b68a69fa (patch)
tree507a3ff52cb4a2185864239190ba13155df1cbf8 /challenge-100
parentdd979819d8042c04464033dcff0c2853546e34c1 (diff)
downloadperlweeklychallenge-club-d12a3c58624c219f252e34b926797aa1b68a69fa.tar.gz
perlweeklychallenge-club-d12a3c58624c219f252e34b926797aa1b68a69fa.tar.bz2
perlweeklychallenge-club-d12a3c58624c219f252e34b926797aa1b68a69fa.zip
use Modern::Perl
Diffstat (limited to 'challenge-100')
-rw-r--r--challenge-100/paulo-custodio/perl/ch-1.pl4
-rw-r--r--challenge-100/paulo-custodio/perl/ch-2.pl4
2 files changed, 2 insertions, 6 deletions
diff --git a/challenge-100/paulo-custodio/perl/ch-1.pl b/challenge-100/paulo-custodio/perl/ch-1.pl
index b334976549..f30e157674 100644
--- a/challenge-100/paulo-custodio/perl/ch-1.pl
+++ b/challenge-100/paulo-custodio/perl/ch-1.pl
@@ -18,9 +18,7 @@
# Input: 19:15
# Output: 07:15 pm or 07:15pm
-use strict;
-use warnings;
-use 5.030;
+use Modern::Perl;
use Time::Piece;
@ARGV==1 or die "Usage: ch-1.pl time\n";
diff --git a/challenge-100/paulo-custodio/perl/ch-2.pl b/challenge-100/paulo-custodio/perl/ch-2.pl
index a6f7dc72c8..e7366e7631 100644
--- a/challenge-100/paulo-custodio/perl/ch-2.pl
+++ b/challenge-100/paulo-custodio/perl/ch-2.pl
@@ -46,9 +46,7 @@
# 5 [2] 3
# 4 3 [1] 3
-use strict;
-use warnings;
-use 5.030;
+use Modern::Perl;
@ARGV or die "Usage: ch-2.pl row1 row2 ...\n";
my @triangle = parse(@ARGV);