Re: encoding neutral unpack

[p5sagit/p5-mst-13.2.git] / t / comp / cpp.t

diff --git a/t/comp/cpp.t b/t/comp/cpp.t
index f6450a5..48250c2 100755 (executable)
--- a/t/comp/cpp.t
+++ b/t/comp/cpp.t
@@ -4,15 +4,16 @@
 
 BEGIN {
     chdir 't' if -d 't';
-    unshift @INC, '../lib';
+    @INC = '../lib';
+    $ENV{PERL5LIB} = '../lib';
 }
 
 use Config;
-if ( $^O eq 'MSWin32' or
-     ($Config{'cppstdin'} =~ /\bcppstdin\b/) and
-     ( ! -x $Config{'binexp'} . "/cppstdin") ) {
-    print "1..0\n";
+if ( $^O eq 'MacOS' ||
+     ($Config{'cppstdin'} =~ /\bcppstdin\b/) &&
+     ! -x $Config{'binexp'} . "/cppstdin" ) {
+    print "1..0 # Skip: \$Config{cppstdin} unavailable\n";
     exit;              # Cannot test till after install, alas.
 }
 
-system "./perl -P comp/cpp.aux"
+system qq{$^X -"P" "comp/cpp.aux"};