Content-Type: application/vnd.openxmlformats-officedocument.spreadsheetml.sheet;
name="Copy of 1501733944381-20170803 Dataload.xlsx"
Content-Description: Copy of 1501733944381-20170803 Dataload.xlsx
Content-Disposition: attachment;
filename="Copy of 1501733944381-20170803 Dataload.xlsx";
size=23847; creation-date="Mon, 09 Oct 2017 12:39:28 GMT";
modification-date="Mon, 09 Oct 2017 12:38:40 GMT"
Content-Transfer-Encoding: base64

##</code><code>##

my $emailfile = basename("$email");
my $tmpdir = "/tmp/$emailfile";
mkdir "$tmpdir";

my $parser = MIME::Parser->new();
$parser->decode_headers(1);
$parser->output_dir("$tmpdir");

my $message = $parser->parse_open("$email");

##</code><code>##

Copy of 150173.xls