Select Code to Download

use strict;
use warnings;
...
   my $xfer = $subnet_xfers{$subnet};
   print("$subnet_ip/$subnet_size: $xfer\n");
}

10.0.0.0/29: 555555
10.2.1.0/29: 666666
10.6.2.8/29: 333333