1 files changed, 6 insertions, 4 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/lib/subs.pm b/systems/texlive/tlnet/tlpkg/tlperl/lib/subs.pm
index 24814596ba..9e01b4e67b 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/lib/subs.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/lib/subs.pm
@@ -1,6 +1,9 @@
 package subs;
 
-our $VERSION = '1.03';
+use strict;
+use warnings;
+
+our $VERSION = '1.04';
 
 =head1 NAME
 
@@ -27,14 +30,13 @@ See L<perlmodlib/Pragmatic Modules> and L<strict/strict subs>.
 
 =cut
 
-require 5.000;
-
 sub import {
     my $callpack = caller;
     my $pack = shift;
     my @imports = @_;
     foreach my $sym (@imports) {
-	*{"${callpack}::$sym"} = \&{"${callpack}::$sym"};
+        no strict 'refs';
+        *{"${callpack}::$sym"} = \&{"${callpack}::$sym"};
     }
 };