in reply to Print the matched pattern

See $& (and also the caveats described there).
Perl 6 - links to (nearly) everything that is Perl 6.