Use base instead of parent for tests

This reduces the risk of cyclical dependencies

Author: Leont

Makefile.PL

@@ -49,7 +49,7 @@ sub write_makefile
     my %test_prereq = (
         'Test::More'            => 0.45,
         'File::Temp'            => 0.13,
-        'parent'                => 0.221,
+        'base'                  => 0,
     );
 
     WriteMakefile( VERSION         => '0.99_25',

t/02derived.t

@@ -22,12 +22,12 @@ BEGIN {
 use lib qw/./;
 
 package version::Bad;
-use parent 'version';
+use base 'version';
 sub new { my($self,$n)=@_;  bless \$n, $self }
 
 # Bad subclass for SemVer failures seen with pure Perl version.pm only
 package version::Bad2;
-use parent 'version';
+use base 'version';
 sub new {
     my ($class, $val) = @_;
     die 'Invalid version string format' unless version::is_strict($val);
@@ -50,7 +50,7 @@ my ($fh, $filename) = tempfile('tXXXXXXX', SUFFIX => '.pm', UNLINK => 1);
 print $fh <<"EOF";
 # This is an empty subclass
 package $package;
-use parent 'version';
+use base 'version';
 our \$VERSION = 0.001;
 EOF
 close $fh;

t/coretests.pm

@@ -435,7 +435,7 @@ SKIP: {
     (my $package = basename($filename)) =~ s/\.pm$//;
     print $fh <<"EOF";
 package $package;
-use parent $CLASS;
+use base $CLASS;
 1;
 EOF
     close $fh;