summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPeter Powell <petpow@saberuk.com>2017-03-24 22:00:00 +0000
committerPeter Powell <petpow@saberuk.com>2017-03-25 00:54:25 +0000
commitd43056bf6abc2e63ecf798085bf78b2aabd61618 (patch)
treec2d14099ebf8fbe28eb34d5339bd9f0266a3e79f
parent5c88e3df25dde6aa6ff849263a79ffda6144cf4d (diff)
Use the standard Perl prelude in ModuleManager.
-rwxr-xr-xmodulemanager18
1 files changed, 10 insertions, 8 deletions
diff --git a/modulemanager b/modulemanager
index 9f9c03344..1ac0c936a 100755
--- a/modulemanager
+++ b/modulemanager
@@ -20,23 +20,25 @@
#
-use strict;
-use warnings FATAL => qw(all);
-
-use make::common;
-
BEGIN {
+ require 5.10.0;
unless (eval "use LWP::Simple; 1") {
die "Your system is missing the LWP::Simple Perl module!";
}
unless (eval "use Crypt::SSLeay; 1" || eval "use IO::Socket::SSL; 1") {
die "Your system is missing the Crypt::SSLeay or IO::Socket::SSL Perl modules!";
}
-
}
-use File::Basename;
-use LWP::Simple;
+use feature ':5.10';
+use strict;
+use warnings FATAL => qw(all);
+
+use File::Basename qw(basename);
+use FindBin qw($RealDir);
+
+use lib $RealDir;
+use make::common;
my %installed;
# $installed{name} = $version