Select Code to Download

use strict ;
use Net::SMTP ;
use warnings ;
...

print "The mail server that responded was $whoareu \n" ;
exit ;