[~]$ perl -le '$re = qr//; print $re;' (?-xism:)