$ perl -le " print qr'\Qa??\E'; "
(?^:\Qa??\E)