foreach $KeyNetName (keys %NetStatsHash) {
        @KeyEntries = split (/\s+/,$MasterKey);
        $KeyNetName = $KeyEntries[0];
        $KeyFanout = $KeyEntries[1];
        $OkayToAdd = 0;
        if ($KeyFanout == $i) {
            @NetDetails = split (/\s+/,$NetStatsHash{$MasterKey});
            $NetCap = $NetDetails[0];
            $NetRes = $NetDetails[1];
### etc.