Have you considered Mail::Sender? Would give you a simpler and more portable way of doing what you want:

(new Mail::Sender)->MailFile({
    smtp    => "your.mailserver.com",
    from    => $from_email,
    to      => $to_email,
    subject => $subject,
    msg     => $message,
    file    => \@filelist
});
[download]

@filelist is an array containing a list of file names to attach.

Cheers!
MrCromeDome