I'm trying to send a csv file as an attachment. The email sends just fine, and has the attachment, but some of the file is removed. It's almost like there is a size limit and it truncates the end of the file. The original is 56KB the emailed file is 48KB. I have tried with multiple different, though the same type of files.

Here is the code I'm using to send the email... though obviously with valid email addresses.

use MIME::Lite;

MIME::Lite->send("smtp","mail.mine.com");

my $msg = MIME::Lite->new(
    From => 'some@thing.com',
    To   => 'me@mine.com',
    Subject => 'A Report',
    Type => 'multipart/mixed',
);

$msg->attach(
    Type =>'TEXT',
    Data => "This is your pretty report",
);

$msg->attach(
    Type     => 'text/csv',
    Path     => 'file.csv',
    Filename => 'file.csv',
    Disposition => 'attachment'
) or die "Error adding file \n";
$msg->send;
[download]