diff options
| author | Paulo Custodio <pauloscustodio@gmail.com> | 2021-11-03 16:10:13 +0000 |
|---|---|---|
| committer | Paulo Custodio <pauloscustodio@gmail.com> | 2021-11-03 16:10:13 +0000 |
| commit | d12a3c58624c219f252e34b926797aa1b68a69fa (patch) | |
| tree | 507a3ff52cb4a2185864239190ba13155df1cbf8 /challenge-102 | |
| parent | dd979819d8042c04464033dcff0c2853546e34c1 (diff) | |
| download | perlweeklychallenge-club-d12a3c58624c219f252e34b926797aa1b68a69fa.tar.gz perlweeklychallenge-club-d12a3c58624c219f252e34b926797aa1b68a69fa.tar.bz2 perlweeklychallenge-club-d12a3c58624c219f252e34b926797aa1b68a69fa.zip | |
use Modern::Perl
Diffstat (limited to 'challenge-102')
| -rw-r--r-- | challenge-102/paulo-custodio/perl/ch-1.pl | 4 | ||||
| -rw-r--r-- | challenge-102/paulo-custodio/perl/ch-2.pl | 4 |
2 files changed, 2 insertions, 6 deletions
diff --git a/challenge-102/paulo-custodio/perl/ch-1.pl b/challenge-102/paulo-custodio/perl/ch-1.pl index 644c5cf065..a9b61d1c5d 100644 --- a/challenge-102/paulo-custodio/perl/ch-1.pl +++ b/challenge-102/paulo-custodio/perl/ch-1.pl @@ -15,9 +15,7 @@ # (b) 6 digits: 621770 # (c) 9 digits: 281089082 -use strict; -use warnings; -use 5.030; +use Modern::Perl; my($N) = @ARGV or die "Usage: ch-1.pl N\n"; print_rare($N); diff --git a/challenge-102/paulo-custodio/perl/ch-2.pl b/challenge-102/paulo-custodio/perl/ch-2.pl index 64afdc45d6..8d495f05ce 100644 --- a/challenge-102/paulo-custodio/perl/ch-2.pl +++ b/challenge-102/paulo-custodio/perl/ch-2.pl @@ -26,9 +26,7 @@ # (d) "#3#5#7#10#" is the string of length 10 # (e) "2#4#6#8#11#14#" is the string of length 14 -use strict; -use warnings; -use 5.030; +use Modern::Perl; my($N) = @ARGV or die "Usage: ch-1.pl N\n"; say hash_counting($N); |