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-098 | |
| 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-098')
| -rw-r--r-- | challenge-098/paulo-custodio/perl/ch-1.pl | 4 | ||||
| -rw-r--r-- | challenge-098/paulo-custodio/perl/ch-2.pl | 4 |
2 files changed, 2 insertions, 6 deletions
diff --git a/challenge-098/paulo-custodio/perl/ch-1.pl b/challenge-098/paulo-custodio/perl/ch-1.pl index 5868e8d57b..72358b81b2 100644 --- a/challenge-098/paulo-custodio/perl/ch-1.pl +++ b/challenge-098/paulo-custodio/perl/ch-1.pl @@ -16,9 +16,7 @@ # print readN("input.txt", 4); # returns "5678" # print readN("input.txt", 4); # returns "90" -use strict; -use warnings; -use 5.030; +use Modern::Perl; sub readN { my($file, $length) = @_; diff --git a/challenge-098/paulo-custodio/perl/ch-2.pl b/challenge-098/paulo-custodio/perl/ch-2.pl index 5cee6df8e9..155035cb39 100644 --- a/challenge-098/paulo-custodio/perl/ch-2.pl +++ b/challenge-098/paulo-custodio/perl/ch-2.pl @@ -25,9 +25,7 @@ # Output: 4 since the target 19 is missing and should be placed at # the index 4. -use strict; -use warnings; -use 5.030; +use Modern::Perl; # use bisect method to search for position sub search_insert { |