in reply to dirty word filter module?

looks like you are going to need this little guy.
die,unless@ARGV;for(@ARGV){if(/.*\n*/){$_="* ";}print;}
Let's see how many people I can piss off with this :)