Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"use Regexp::Common;
...
ng|[aaa])|fuck(?:ers?|ing|[aaa]))|er(?:\ fuck(?:ers?|ing)|\-fuck(?:ers
+?|ing)|fuck(?:ers?|ing)))|erde
?)))'
B: match 'piss'