$user_text =~ m/$user_regex/;
print $&;