Suggestions?

Anyone have something similar to this, that is not reliant on perl? I
found this in junkfilter, only adding a small bit to it. This works fine
for me, but if there is a better way, I'd like to see it and use it. 


## Create list of banned addresses #####################
BLACKLIST="(`perl -p0e '
                        s/\012(.)/\|$1/g;
                        s/\015//g;
                        s/\|{2,}/\|/g;
                        s/\./\\\./g
                       ' < $HOME/blacklist`)"
########################################################

-- 
Robert Hough (rch(_at_)solveinteractive(_dot_)com)
_______________________________________________
procmail mailing list
procmail(_at_)lists(_dot_)RWTH-Aachen(_dot_)DE
http://MailMan.RWTH-Aachen.DE/mailman/listinfo/procmail