You might suspect that such a tool has already been created; certainly you're not the first Perl user to have the need.
Assuming you're actually trying to solve a problem rather than just have a little fun in a public forum, you should look at Regexp::Common::profanity, Regexp::Common::profanity_us, or Regexp::Profanity::US. Those solutions are further along the development path than yours.
Dave
In reply to Re: Regex from a file
by davido
in thread Regex from a file
by gon770
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |