# New Ticket Created by Rob Hoelz
# Please include the string: [perl #125753]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=125753 >
For example:
> "%E3%81%82" ~~ m:ignorecase/["%" (<[a..f0..9]> ** 2)]+/ && say $/[0]
Only prints 81 and 82, not E3.
A test file is attached.
use v6;
use Test;
plan 1;
'%E3%81%82' ~~ m:ignorecase/['%' (<[a..f0..9]> ** 2)]+/;
my @matches = $/[0]».Str;
ok any(@matches) eq 'E3', 'E3 is among the matches';