while (my $d = $ks_sth->fetchrow_hashref()){
        $KP->{$d->{k}}{$d->{v}}++;
    }

##</code><code>##

$VAR1 = {
          '3094507' => {
                         '2838413' => '22',
                         '2976790' => '33',
                         '539960' => '10',
                         '2152725' => '19',
                         '161546' => '5',
                         '2197572' => '3'
                       },
          '2946464' => {
                         '2952428' => '9',
                         '3913125' => '10',
                         '790014' => '2',
                         '1065575' => '3'
                       },
          '2565888' => {
                         '10538' => '1',
                         '744' => '2'
                       },
        };