# New Ticket Created by Bram # Please include the string: [perl #56194] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=56194 > While testing [perl #27603] to see if the warning is gone I noticed this: perl-5.10.0 -wle 'if (123 =~ /^(\d)(((??{1 + $^N})))+$/) { print "match"; } else { print "no match"; }' match perl-blead -wle 'if (123 =~ /^(\d)(((??{1 + $^N})))+$/) { print "match"; } else { print "no match"; }' no match And: perl-5.10.0 -wle 'if (122 =~ /^(\d)(((??{1 + $^N})))+$/) { print "match"; } else { print "no match"; }' no match perl-blead -wle 'if (122 =~ /^(\d)(((??{1 + $^N})))+$/) { print "match"; } else { print "no match"; }' match Is this change of behaviour intended? Kind regards, Bram