From e4f7283487294e721916af0b262363d0301bee6c Mon Sep 17 00:00:00 2001
From: Graham Knop <haarg@haarg.org>
Date: Thu, 17 Oct 2024 22:45:36 +0200
Subject: [PATCH] don't use vars, use our

---
 lib/File/chdir.pm | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/lib/File/chdir.pm b/lib/File/chdir.pm
index f3b3f94..47cdba6 100644
--- a/lib/File/chdir.pm
+++ b/lib/File/chdir.pm
@@ -1,21 +1,20 @@
 package File::chdir;
-use 5.004;
+use 5.006;
 use strict;
-use vars qw($VERSION @ISA @EXPORT $CWD @CWD);
 # ABSTRACT: a more sensible way to change directories
 
 our $VERSION = '0.1012';
 
 require Exporter;
-@ISA = qw(Exporter);
-@EXPORT = qw(*CWD);
+our @ISA = qw(Exporter);
+our @EXPORT = qw(*CWD);
 
 use Carp;
 use Cwd 3.16;
 use File::Spec::Functions 3.27 qw/canonpath splitpath catpath splitdir catdir/;
 
-tie $CWD, 'File::chdir::SCALAR' or die "Can't tie \$CWD";
-tie @CWD, 'File::chdir::ARRAY'  or die "Can't tie \@CWD";
+tie our $CWD, 'File::chdir::SCALAR' or die "Can't tie \$CWD";
+tie our @CWD, 'File::chdir::ARRAY'  or die "Can't tie \@CWD";
 
 sub _abs_path {
     # Otherwise we'll never work under taint mode.