#!/usr/bin/perl

use strict;
use warnings;
use Data::Dumper;
$|++;

my $numOfHashes = 5;
my $hashref = {
          '6712' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6712'
                    },
          '6582' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6582'
                    },
          '6282' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6282'
                    },
          '6462' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6462'
                    },
          '16712' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6712'
                    },
          '26582' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6582'
                    },
          '36282' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6282'
                    },
          '46462' => {
                      'IP_ADDRESS' => '1.2.3.44',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6462'
                    },
          '96182' => {
                      'IP_ADDRESS' => '9.0.0.0',
                      'IPV6' => '0',
                      'IP_ADDRESS_BIN' => '000000000000000000000000000000000000000',
                      'CSX_ID' => '6182'
                    }

  };

my $keys = keys %{$hashref};
my $worker;

print "Original Hash Keys: $keys\n";
my $i=0;
foreach my $key ( keys %{$hashref} ) {
        $worker->{$i++}{$key} = $hashref->{$key};
        $i %= $numOfHashes;
}
print Dumper($worker);