/(?:)$pat/ /(?:$pat)/ my $re = qr/$pat/; /$re/