my $msg = MIME::Lite->new( Type =>'multipart/related' ); $msg->attach( Type => 'text/html', Data => qq{Image: }, ); $msg->attach( Type => 'image/gif', Id => '', Path => '/path/to/somefile.gif', ); $msg->send();