Help for this page

Select Code to Download


  1. or download this
    if($#ARGV==-1)
    {
    ...
    print"Report: ",$rptname,"\n";
    open(RPT,">$rptname")||warn "Unable to open report file: $!\n";
    
  2. or download this
    use MIME::Lite;
    
    ...
             Filename =>'summary'.$date.'.txt');
    
    $msg->send;