perl -n -e "next unless /[^\s]/; print" /etc/spamdomains.txt