Help for this page
my %process = ( 'foo*' => qr/^foo.*$/, foo => 'foo' );
{ my %replace; ... return qr/^$pattern\z/; } }