Fix run/switches test on Win32

From: "Steve Hay" <SteveHay@planit.com>
Message-ID: <1B32FF956ABF414C9BCE5E487A1497E701DF242E@ukmail02.planit.group>

p4raw-id: //depot/perl@34040

diff --git a/t/run/switches.t b/t/run/switches.t
index e5ac5d1..76dec73 100644 (file)
--- a/t/run/switches.t
+++ b/t/run/switches.t
@@ -348,7 +348,7 @@ $r = runperl(
 is( $r, "Hello, world!\n", "-E given" );
 
 $r = runperl(
-    switches    => [ '-nE', q('} END { say q/affe/') ],
+    switches    => [ '-nE', q("} END { say q/affe/") ],
     stdin       => 'zomtek',
 );
 is( $r, "affe\n", '-E works outside of the block created by -n' );