For writing an email , this example can show you a way mimesend .
For striping out an attachment:

#!/usr/bin/perl
use MIME::Parser;
foreach(@ARGV){
$p = new MIME::Parser;
$e = $p->parse_open($_);
}
[download]

I haven't used any other modules. Examine MIME-tools, it is a powerful module.