Make sure it includes the words I find offensive: god
Dear Valued Member of the Perlmonks Community:
For technical reasons, we are unable to comply with
your request to filter these words, since it would
interfere with certain functionality of
our site. Please understand that this is a purely
technical consideration and does not constitute an
explicit lack of agreement with your perspective on
this matter, but we are unable to accommodate you in
this way at this time.
$;=sub{$/};@;=map{my($a,$b)=($_,$;);$;=sub{$a.$b->()}}
split//,".rekcah lreP rehtona tsuJ";$\=$ ;->();print$/