| Subject: | 'mod' key of Parse::RecDescent::Token |
in sub Parse::RecDescent::Token::deparse
return "m".$self->{ldelim}.$self->{pattern}.$self->{rdelim};
perhaps can be changed by:
return "m".$self->{ldelim}.$self->{pattern}.$self->{rdelim}.$self->{mod};