# New Ticket Created by Faye
# Please include the string: [perl #125521]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=125521 >
$ perl6 -e 'say "AAA" ~~ /$<letter>=(A)+/'
「AAA」
letter => 「A」
letter => 「A」
letter => 「A」
$ perl6 -e 'say "AAA" ~~ /$<letter>=(A)**3/'
「AAA」
letter => 「A」
letter => 「A」
letter => 「A」
$ perl6 -e 'say "AAA" ~~ /$<letter>=(A)**{3}/'
「AAA」
letter => 「AAA」
The braced version of ** stores all the matches of the capture it quantifies
under one capture, instead of an array of captures like other quantifiers do
(including brace-less **)