Avoid using double quotes in a one-liner runperl.

test.pl uses "" for command line quoting on Win32, VMS and NetWare, '' on *nix.
Hence what "works on my machine" on *nix may not work elsewhere.

1 files changed, 1 insertions, 1 deletions

diff --git a/t/op/ref.t b/t/op/ref.t
index 84cd40eead..bad0168872 100644
--- a/t/op/ref.t
+++ b/t/op/ref.t
@@ -638,7 +638,7 @@ is( runperl(stderr => 1, prog => 'my $i;for $i (1) { for $i (2) { } }'), "");
 
 is (runperl(
 	prog => 'eval q[bless \@y; bless \$x; $y[0] = \*x; $z = \*y; ]; '
-		. 'delete $::{x}; delete $::{y}; print "ok\n";',
+		. 'delete $::{x}; delete $::{y}; print qq{ok\n};',
 	stderr => 1),
     "ok\n", 'freeing freed glob in global destruction');