diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-09-23 06:36:59 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-09-23 06:36:59 +0000 |
| commit | 6e68dac881cea847d8831bc4b3fdb32ae55b843d (patch) | |
| tree | 018c403327273caabccf37053c49b47b0b5b9131 /t/op/subst.t | |
| parent | 8af582d578f31fcecd6dac626ec996749605282e (diff) | |
| download | perl-6e68dac881cea847d8831bc4b3fdb32ae55b843d.tar.gz | |
add missing C<no utf8;> tweak from Larry
p4raw-id: //depot/perl@1822
Diffstat (limited to 't/op/subst.t')
| -rwxr-xr-x | t/op/subst.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/op/subst.t b/t/op/subst.t index afa06ab772..81cafec75f 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]; |