VMS needs quotes around the -I option to keep it from

being downcased, from Charles Lane.

p4raw-id: //depot/perl@12396

diff --git a/t/run/kill_perl.t b/t/run/kill_perl.t
index 1d09d4e..ce98e01 100644 (file)
--- a/t/run/kill_perl.t
+++ b/t/run/kill_perl.t
@@ -79,7 +79,7 @@ foreach my $prog (@prgs) {
        $results = `$^X -I::lib -MMac::err=unix $switch $tmpfile`;
     }
     else {
-      $results = `./perl -I../lib $switch $tmpfile 2>&1`;
+      $results = `./perl "-I../lib" $switch $tmpfile 2>&1`;
     }
     my $status = $?;