From: Abe Timmerman <abe@ztreet.demon.nl>
Date: Thu, 17 Oct 2002 23:38:34 +0000 (+0200)
Subject: Re: Smoke 18027 FAIL(F) MSWin32 5.0 Win2000Pro (MSWin32-x86)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0fbedf1d02b8cd54a5c0f7085e51fe64e9af7892;p=p5sagit%2Fp5-mst-13.2.git

Re: Smoke 18027 FAIL(F) MSWin32 5.0 Win2000Pro (MSWin32-x86)
Message-Id: <200210172338.34728.abe@ztreet.demon.nl>

p4raw-id: //depot/perl@18028
---

diff --git a/t/run/switches.t b/t/run/switches.t
index 9bcbc80..bfae4eb 100644
--- a/t/run/switches.t
+++ b/t/run/switches.t
@@ -66,7 +66,7 @@ is( $r, 'abc-def--ghi-jkl-mno--pq-/', '-0777 (slurp mode)' );
 
 $r = runperl(
     switches	=> [ '-066' ],
-    prog	=> 'BEGIN { print "($/)" } print "[$/]"',
+    prog	=> 'BEGIN { print qq{($/)} } print qq{[$/]}',
 );
 is( $r, "(\066)[\066]", '$/ set at compile-time' );