Perl module to send mail with Attachments

I have been using Mail::Sendmail for sending emails, but sending
attachments as described on

http://alma.ch/perl/Mail-Sendmail-FAQ.html#attachments

looks kind of messy. Is there a better module with methods such as

add_attachment( $filename, $mimetype, $body )

or some such. Thanks.

i