print $reg_exp;