my ( $pat, $flags ) = re::regexp_pattern( $re );