art-helpers

commit 38817e1c0febcad87eea17bb96871331d112be90
parent d5789936b7cc4e5c841a81c1810e0227d170917d
Author: René Wagner <rwagner@rw-net.de>
Date:   Fri, 21 Aug 2020 18:23:45 +0200

use Modern::Perl instead of usings

Diffstat:
M
.build.yml
 | 
1
+
M
afm.pl
 | 
5
+----
M
jd.pl
 | 
5
+----
M
spmvsc.pl
 | 
5
+----
M
sposc.pl
 | 
5
+----

5 files changed, 5 insertions(+), 16 deletions(-)
diff --git a/.build.yml b/.build.yml
@@ -4,6 +4,7 @@ packages:
   - perl-par-packer
   - perl-file-find-rule
   - perl-file-homedir
+  - perl-modern-perl
 sources:
   - https://git.sr.ht/~rwa/photo-helpers
 artifacts:
diff --git a/afm.pl b/afm.pl
@@ -3,13 +3,10 @@
 # https://git.sr.ht/~rwa/photo-helpers
 # published under BSD 3-Clause License - https://git.sr.ht/~rwa/photo-helpers/tree/master/LICENSE
 
-use warnings;
-use strict;
-use feature qw(say);
+use Modern::Perl '2019';
 use Cwd;
 use File::Basename;
 use File::Copy;
-use File::Find;
 use File::Find::Rule;
 use File::Spec::Functions;
 use File::HomeDir;
diff --git a/jd.pl b/jd.pl
@@ -3,13 +3,10 @@
 # https://git.sr.ht/~rwa/photo-helpers
 # published under BSD 3-Clause License - https://git.sr.ht/~rwa/photo-helpers/tree/master/LICENSE
 
-use warnings;
-use strict;
-use feature qw(say);
+use Modern::Perl '2019';
 use Cwd;
 use File::Basename;
 use File::Copy;
-use File::Find;
 use File::Find::Rule;
 use File::Spec::Functions;
 use Getopt::Std;
diff --git a/spmvsc.pl b/spmvsc.pl
@@ -3,13 +3,10 @@
 # https://git.sr.ht/~rwa/photo-helpers
 # published under BSD 3-Clause License - https://git.sr.ht/~rwa/photo-helpers/tree/master/LICENSE
 
-use warnings;
-use strict;
-use feature qw(say);
+use Modern::Perl '2019';
 use Cwd;
 use File::Basename;
 use File::Find::Rule;
-use File::Find;
 use Getopt::Std;
 
 $Getopt::Std::STANDARD_HELP_VERSION = 'true';
diff --git a/sposc.pl b/sposc.pl
@@ -3,13 +3,10 @@
 # https://git.sr.ht/~rwa/photo-helpers
 # published under BSD 3-Clause License - https://git.sr.ht/~rwa/photo-helpers/tree/master/LICENSE
 
-use warnings;
-use strict;
-use feature qw(say);
+use Modern::Perl '2019';
 use Cwd;
 use File::Basename;
 use File::Find::Rule;
-use File::Find;
 use File::Spec::Functions;
 use Getopt::Std;