Help for this page

Select Code to Download


  1. or download this
    use Mail::Sendmail;
    
    ...
    sendmail(%mail) || print "Error sending mail: $Mail::Sendmail::error\n
    +"; 
    
    print "OK. Log says:\n", $Mail::Sendmail::log;
    
  2. or download this
    OK. Log says:
    Mail::Sendmail v. 0.78 - Fri Jun  1 14:04:29 2001
    Date: Fri, 1 Jun 2001 14:04 +0100