Select Code to Download

for my $to (sort keys %from_to_bytes){
        printf "%10s", "$from_to_bytes{$to}";
}

my %total_col;
for my $i (keys %from_to_bytes) {
...
}

print "\n";