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