Help for this page

Select Code to Download

Select or download this

use Mail::Sendmail;

...
   delete($f->{attachment});
   sendmail(%$f);
}