Bug 801751

Summary: Regression with /i, latin1 chars
Product: Red Hat Enterprise Linux 7 Reporter: Petr Pisar <ppisar>
Component: perlAssignee: perl-maint-list
Status: CLOSED CURRENTRELEASE QA Contact: Martin Kyral <mkyral>
Severity: unspecified Docs Contact:
Priority: unspecified    
Version: 7.0CC: cweyl, iarnell, jplesnik, kasal, lkundrak, mkyral, mmaslano, ppisar, psabata, rc040203, tcallawa
Target Milestone: rc   
Target Release: ---   
Hardware: Unspecified   
OS: Unspecified   
URL: https://rt.perl.org/rt3/Public/Bug/Display.html?id=101710
Whiteboard:
Fixed In Version: perl-5.16.3-280.el7 Doc Type: Bug Fix
Doc Text:
Story Points: ---
Clone Of: 801739 Environment:
Last Closed: 2014-06-12 07:59:02 UTC Type: ---
Regression: --- Mount Type: ---
Documentation: --- CRM:
Verified Versions: Category: ---
oVirt Team: --- RHEL 7.3 requirements from Atomic Host:
Cloudforms Team: --- Target Upstream Version:

Description Petr Pisar 2012-03-09 11:52:58 UTC 
+++ This bug was initially created as a clone of Bug #801739 +++

$ perl -e 'use 5.012; my $x="br\x{f8}ndby"; $x =~ s/b/X/gi; say $x;'
Xr�ndby

This is regression introduced in Perl 5.14. perl-5.14.2-197.fc16.x86_64 is affected.

Reported to upstream <https://rt.perl.org/rt3/Public/Bug/Display.html?id=101710> a and fixed in development tree by commit:

commit bbdd8bad57f8d77a4e6c3725a49d4d3589efedd7
Author: Karl Williamson <public>
Date:   Tue Nov 1 17:57:15 2011 -0600

    PATCH: [perl #101710] Regression with /i, latin1 chars.
    
    The root cause of this bug is that it was assuming that a string was in
    utf8 when it wasn't, and so was thinking that a byte was a starter byte
    that wasn't, so was skipping ahead based on that starter byte.
-------

RHEL-7 affected (perl-5.14.2-190.el7.x86_64).
Comment 2 Jitka Plesnikova 2013-09-13 13:34:44 UTC 
Fixed in Perl 5.16