if(defined($email->{'attachments'}->{'count'})){
    $msg = MIME::Lite->new(
          From    => "$email->{'from'}",
          To      => "$row->{'email'}",
          Subject => "$subject",
             Type => 'multipart/mixed',
        );

<snip>

  if(defined($email->{'attachments'}->{'count'})){
    for my $i (1 .. $email->{'attachments'}->{'count'}){
      $msg->attach( Type => $email->{'attachments'}->{$i}->{'Content-t
+ype'},
             Disposition => $email->{'attachments'}->{$i}->{'dispositi
+on'},
                    Path => $email->{'attachments'}->{$i}->{'file-path
+'},
                Filename => $email->{'attachments'}->{$i}->{'filename'
+},
                Encoding => 'base64',
                      );
    }
  }
[download]