in reply to Cannot seem to remove empty/blank lines

Try:
open(LOG,"+</etc/spamdomains.txt") || die "Can't open spam file\n"; while (<LOG>) { /[^\s]+/ && print; } close(LOG);


/brother t0mas