From 6e68dac881cea847d8831bc4b3fdb32ae55b843d Mon Sep 17 00:00:00 2001
From: Gurusamy Sarathy <gsar@cpan.org>
Date: Wed, 23 Sep 1998 06:36:59 +0000
Subject: [PATCH] add missing C<no utf8;> tweak from Larry

p4raw-id: //depot/perl@1822
---
 t/op/subst.t | 1 +
 1 file changed, 1 insertion(+)

diff --git a/t/op/subst.t b/t/op/subst.t
index afa06ab..81cafec 100755
--- 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];
-- 
2.7.4