Help for this page

Select Code to Download


  1. or download this
    sub sendmessage {
        my ($html,$text,$recipient,$reportdate) = @_;
    ...
        sendmail(%mail) || die "Error: $Mail::Sendmail::error\n";
        return;
    }
    
  2. or download this
    Return-path: <info@*****.org>
    Envelope-to: corman@*****.com
    ...
    To: corman@*****.com
    Date: Fri, 27 Jun 2008 17:20:57 -0600
    From: info@*****.org