you can also reuse the matches within the regex Let's see an example (based on the perl 6 book) to try to find repeated words:
examples/regex2/reuse_capture.p6use v6;
my $s = 'The elvish brown fox jumped over the the lazy dog';
if $s ~~ m/ (\w+) \W+ $0 / {
say $/[0];
}
# this will print an 'e' which is not what we wanted