summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/tlperl/lib/FindBin.pm
diff options
context:
space:
mode:
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tlperl/lib/FindBin.pm')
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/lib/FindBin.pm14
1 files changed, 8 insertions, 6 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/lib/FindBin.pm b/systems/texlive/tlnet/tlpkg/tlperl/lib/FindBin.pm
index cf6ecf2904..a1b768a107 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/lib/FindBin.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/lib/FindBin.pm
@@ -77,19 +77,21 @@ under the same terms as Perl itself.
=cut
package FindBin;
+use strict;
+use warnings;
+
use Carp;
-require 5.000;
require Exporter;
use Cwd qw(getcwd cwd abs_path);
use File::Basename;
use File::Spec;
-@EXPORT_OK = qw($Bin $Script $RealBin $RealScript $Dir $RealDir);
-%EXPORT_TAGS = (ALL => [qw($Bin $Script $RealBin $RealScript $Dir $RealDir)]);
-@ISA = qw(Exporter);
-
-$VERSION = "1.51";
+our ($Bin, $Script, $RealBin, $RealScript, $Dir, $RealDir);
+our @EXPORT_OK = qw($Bin $Script $RealBin $RealScript $Dir $RealDir);
+our %EXPORT_TAGS = (ALL => [qw($Bin $Script $RealBin $RealScript $Dir $RealDir)]);
+our @ISA = qw(Exporter);
+our $VERSION = "1.52";
# needed for VMS-specific filename translation
if( $^O eq 'VMS' ) {