Use ../../perl instead of ../../t/perl on Win32, as the latter doesn't work.
Nicholas Clark [Sat, 29 Aug 2009 20:31:45 +0000 (21:31 +0100)]
There seems to be some problem when paths that contain a directory named t are
make absolute, then fed to the command shell to be executed. I'm suspicious
that \t is getting interpolated as a tab by something, but there is no
confirmed diagnosis yet.

t/TEST

diff --git a/t/TEST b/t/TEST
index 7f2190c..065d8c8 100755 (executable)
--- a/t/TEST
+++ b/t/TEST
@@ -197,7 +197,9 @@ sub _run_test {
            $ext_dir = $1;
            $return_dir = '../../t';
            $lib = '../../lib';
-           $perl = '../../t/perl';
+           # Something doesn't quite work correctly when making paths
+           # that contain /t/ absolute on Win32. \t being interpreted as tab?
+           $perl = $^O eq 'MSWin32' ? '../../perl' : '../../t/perl';
            $testswitch = "-I$return_dir -MTestInit=U2T,A";
            if ($temp_no_core{$ext_dir}) {
                $testswitch = $testswitch . ',NC';