my ( $myhash ) = shift; $params{Date} = $myhash->{DATEPOSTED}; $params{Title} = $myhash->{TITLE}; $msg = MIME::Lite::TT::HTML->new( From => 'arun@xxxxxxx.net', To => 'root@xxxxxx.net', Subject => $myhash->{TITLE}, Template => { html => 'sometemp.html.tt', }, TmplOptions => \%options, TmplParams => \%params, ); # Set our content type properly #$msg->attr("content-type" => "multipart/mixed"); #$msg->attr("content-type" => "text/html"); # Attaching resume $msg->attach( Type => 'application/doc', Path => 'attachments', Filename => 'books.doc', Disposition => 'attachment', );