add missing C<no utf8;> tweak from Larry

p4raw-id: //depot/perl@1822

diff --git a/t/op/subst.t b/t/op/subst.t
index afa06ab..81cafec 100755 (executable)
--- a/t/op/subst.t
+++ b/t/op/subst.t
@@ -182,6 +182,7 @@ print $_ eq 'ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789' ? "ok 52\n" : "not ok 52\n";
 
 # same as tr/A-Z/a-z/;
 if ($^O eq 'os390') {  # An EBCDIC variant.
+    no utf8;
     y[\301-\351][\201-\251];
 } else {               # Ye Olde ASCII.  Or something like it.
     y[\101-\132][\141-\172];