[perl #111400] POSIX character class [:upper:] is broken

On Mon Feb 27 13:38:06 2012, caelum wrote:

> -----------------------------------------------------------------
> Running this command:
> 
> perl -le 'use utf8; print "is uppercase" if "ḿ" =~ /^[[:upper:]]\z/'
> 
> prints "is uppercase" but should not
> 
> This command:
> 
> perl -le 'use utf8; print "wtf" if "\x{1e3f}" =~ /^[[:upper:]]\z/'
> 
> prints "wtf" but should not
> 

Using the attached program, 111400.pl, in Perl 5.14.2, I cannot
reproduce your results.  My program's output DWIMs:

#####
$ perl 111400.pl 
2. is lowercase

3. is uppercase

6. is lowercase

8. wtf
#####

But I notice that you are using 5.15.8.  Could you try with some version
of Perl 5.14 so that we can see if this is a bug in devel?

Thank you very much.
Jim Keenan

---
via perlbug:  queue: perl5 status: new
https://rt.perl.org:443/rt3/Ticket/Display.html?id=111400

• [perl #111400] POSIX character class [:upper:] is broken by Karl Williamson via RT
• [perl #111400] POSIX character class [:upper:] is broken by rkitover @ cpan . org
• [perl #111400] POSIX character class [:upper:] is broken by James E Keenan via RT
• [perl #111400] POSIX character class [:upper:] is broken by James E Keenan via RT
• Re: [perl #111400] POSIX character class [:upper:] is broken by Nicholas Clark