$laat = @$summaries[$#$summaries];
$part = $laat->get_subpart(2.0);
$body = $imap->get_part_body($laatste,2.0);
$cte = $part->transfer_encoding;  # after this print $cte would say 8bit, so seems ok.
$bod = Email::MIME::Encodings::decode($cte, $body);
print $$bod;