Select Code to Download

use strict;
use Net::IMAP::Simple;
...

print "\n total = ", $fmt->format_bytes($total, 1), " bytes\n";