Failure not true anymore (probably caused by my broken setup).

p4raw-id: //depot/perl@11654

diff --git a/t/op/pat.t b/t/op/pat.t
index a4cd324..bed2f37 100755 (executable)
--- a/t/op/pat.t
+++ b/t/op/pat.t
@@ -237,7 +237,7 @@ print "ok 63\n";
 $out = 1;
 'abc' =~ m'a(?{ $out = 3 })c';
 print "not " if $out != 1;
-print "ok 64\n"; # this fails under use utf8 for no apparent reason --jhi
+print "ok 64\n";
 
 $_ = 'foobar1 bar2 foobar3 barfoobar5 foobar6';
 @out = /(?<!foo)bar./g;