This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Synch cpan/version/* and other files with CPAN version 0.9921.
[perl5.git] / cpan / version / t / 01base.t
index 6174194..608dc52 100644 (file)
@@ -5,11 +5,16 @@
 #########################
 
 use Test::More qw/no_plan/;
+use File::Spec;
 
 BEGIN {
-    (my $coretests = $0) =~ s'[^/]+\.t'coretests.pm';
+    my $coretests = File::Spec->rel2abs(
+        File::Spec->catpath(
+            (File::Spec->splitpath($0))[0,1], 'coretests.pm'
+        )
+    );
     require $coretests;
-    use_ok('version', 0.9909);
+    use_ok('version', 0.9921);
 }
 
 BaseTests("version","new","qv");