Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

case-insensitive regexp bug in perl 5.17.x?

by karpet (Acolyte)
on Sep 20, 2012 at 15:09 UTC ( #994681=perlquestion: print w/ replies, xml ) Need Help??
karpet has asked for the wisdom of the Perl Monks concerning the following question:

This test demonstrates code that has worked for me until 5.17.0. It fails in 5.17.0 and higher.
#!/usr/bin/env perl use strict; use warnings; use Test::More tests => 2; my $str = ' Foo '; # uppercase breaks 2nd regex my $pattern = 'foo'; utf8::upgrade($str); utf8::upgrade($pattern); my $re = qr/$pattern/i; my $re_optional = qr/(?i:.?)$pattern/i; like( $str, $re, "re" ); like( $str, $re_optional, "re_optional" );
Am I missing something?

Comment on case-insensitive regexp bug in perl 5.17.x?
Download Code
Re: case-insensitive regexp bug in perl 5.17.x?
by sth (Priest) on Sep 20, 2012 at 15:57 UTC
    Did you post to P5P list? That is a development version, so you should probably post the question there. Also 5.17.4 was released, you could try with that version (if you haven't already).
      Thanks. Opened RT ticket via perlbug.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://994681]
Front-paged by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (6)
As of 2014-12-25 08:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (159 votes), past polls