Skip to content
Browse files

use $Config{perlpath} rather than $^X

  • Loading branch information...
1 parent 575b663 commit 69396c350e6b8117a0564026418173ea88f67938 @jberger committed Feb 10, 2012
Showing with 6 additions and 1 deletion.
  1. +6 −1 t/90_full.t
View
7 t/90_full.t
@@ -1,5 +1,6 @@
use strict;
+use Config;
print "1..29\n";
@@ -15,7 +16,11 @@ $ENV{ARRAY} = join ':', qw/f00 ok b4r/;
$SIG{PIPE} = 'IGNORE';
$|++;
-my $zoid = "| $^X script/zoid -o data_dirs=share -o rcfiles=../t/zoidrc";
+
+# recommended over $^X by http://wiki.cpantesters.org/wiki/CPANAuthorNotes
+my $perlpath = $Config{perlpath};
+
+my $zoid = "| $perlpath script/zoid -o data_dirs=share -o rcfiles=../t/zoidrc";
open ZOID, $zoid;

0 comments on commit 69396c3

Please sign in to comment.
Something went wrong with that request. Please try again.