Have you looked at what existing modules, like MIME::Lite produce? I use MIME::Lite to attach files to mails a long time already and it works quite well.