Select Code to Download

$MIME::Lite::AUTO_CONTENT_TYPE = 1;

...
   Disposition => 'attachment'
   ) or die "Error adding $file: $!\n";            
$msg->send;