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-006 | |
| 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-006')
| -rw-r--r-- | challenge-006/paulo-custodio/perl/ch-1.pl | 4 | ||||
| -rw-r--r-- | challenge-006/paulo-custodio/perl/ch-2.pl | 4 |
2 files changed, 2 insertions, 6 deletions
diff --git a/challenge-006/paulo-custodio/perl/ch-1.pl b/challenge-006/paulo-custodio/perl/ch-1.pl index 94fc7119bb..726898318c 100644 --- a/challenge-006/paulo-custodio/perl/ch-1.pl +++ b/challenge-006/paulo-custodio/perl/ch-1.pl @@ -7,9 +7,7 @@ # same in the compact form. For example, if you pass "1,2,3,4,9,10,14,15,16" # then it should print the compact form like "1-4,9,10,14-16". -use strict; -use warnings; -use 5.030; +use Modern::Perl; my @nums = sort {$a<=>$b} split /\D+/, "@ARGV"; while (@nums) { diff --git a/challenge-006/paulo-custodio/perl/ch-2.pl b/challenge-006/paulo-custodio/perl/ch-2.pl index 053b9e377e..748a86aaa5 100644 --- a/challenge-006/paulo-custodio/perl/ch-2.pl +++ b/challenge-006/paulo-custodio/perl/ch-2.pl @@ -10,9 +10,7 @@ # gives only 15 to 17 significant decimal digits # Therefore must use the bignum library -use strict; -use warnings; -use 5.030; +use Modern::Perl; use Math::BigFloat; my $accuracy = 128; |