Perl script is sending mail very slow via sendmail - one mail every 30 seconds

view full story

http://serverfault.com – I have a perl script that sends mail out to a mailing list. On my old dedicated server, it worked fine, and sent one email per second basically. I recently switched to a new dedicated server, with about the same specs, and it's going extremely slow, about one mail every 30 seconds. I set up a test script to watch what part takes the longest: open(MAIL,"| /usr/sbin/sendmail -tv -d8.7 $recipient_email"); print MAIL <<EOF; From:Test Sender <$sender> To:$recipient_email Subject:Testing Justw ant to see how long this takes EOF close(MAIL); The -d8.7 there is a debug option that le (HowTos)