6 files changed, 5 insertions, 6 deletions
diff --git a/cpan/version/t/01base.t b/cpan/version/t/01base.t
index a178ab52dd..e6df81a15b 100644
--- a/cpan/version/t/01base.t
+++ b/cpan/version/t/01base.t
@@ -5,7 +5,7 @@
 #########################
 
 use Test::More qw/no_plan/;
-my $Verbose;
+our $Verbose;
 
 BEGIN {
     (my $coretests = $0) =~ s'[^/]+\.t'coretests.pm';
diff --git a/cpan/version/t/02derived.t b/cpan/version/t/02derived.t
index 849a45a23d..afdf531f65 100644
--- a/cpan/version/t/02derived.t
+++ b/cpan/version/t/02derived.t
@@ -6,7 +6,7 @@
 
 use Test::More qw/no_plan/;
 use File::Temp qw/tempfile/;
-my $Verbose;
+our $Verbose;
 
 BEGIN {
     (my $coretests = $0) =~ s'[^/]+\.t'coretests.pm';
diff --git a/cpan/version/t/03require.t b/cpan/version/t/03require.t
index 7f3e26a2bd..316ea24170 100644
--- a/cpan/version/t/03require.t
+++ b/cpan/version/t/03require.t
@@ -5,7 +5,7 @@
 #########################
 
 use Test::More qw/no_plan/;
-my $Verbose;
+our $Verbose;
 
 BEGIN {
     (my $coretests = $0) =~ s'[^/]+\.t'coretests.pm';
diff --git a/cpan/version/t/04strict_lax.t b/cpan/version/t/04strict_lax.t
index 2c94448269..24a7215409 100644
--- a/cpan/version/t/04strict_lax.t
+++ b/cpan/version/t/04strict_lax.t
@@ -5,7 +5,6 @@
 #########################
 
 use Test::More qw/no_plan/;
-my $Verbose;
 
 # do strict lax tests in a sub to isolate a package to test importing
 SKIP: {
diff --git a/cpan/version/t/07locale.t b/cpan/version/t/07locale.t
index dcb0536df1..ab2affcd8e 100644
--- a/cpan/version/t/07locale.t
+++ b/cpan/version/t/07locale.t
@@ -9,7 +9,7 @@ use File::Temp qw/tempfile/;
 use POSIX qw/locale_h/;
 use Test::More tests => 7;
 use Config;
-my $Verbose;
+our $Verbose;
 
 BEGIN {
     use_ok('version', 0.9903);
diff --git a/cpan/version/t/coretests.pm b/cpan/version/t/coretests.pm
index 92aeae2111..df1984a603 100644
--- a/cpan/version/t/coretests.pm
+++ b/cpan/version/t/coretests.pm
@@ -2,7 +2,7 @@
 package main;
 require Test::Harness;
 *Verbose = \$Test::Harness::Verbose;
-*Verbose = 0 if $ENV{PERL_CORE};
+$Verbose = 0 if $ENV{PERL_CORE};
 use Data::Dumper;
 use File::Temp qw/tempfile/;
 use File::Basename;