Help for this page

Select Code to Download


  1. or download this
    # Wrapped for Perl Monks, unwrap before using
    LOG="/path/to/mail.log"
    ...
    # Check the existing rulesets for dupes, and remove
    $IPT-save | sort | uniq -d | perl -lne 'print /((?:\d+\.){3}\d+)/' \
       | xargs -i $DUP