$hash{"COUNTS"} = [ (1) x $length ];

##</code><code>##

$hash{"LISTS"}  = [ map [], 1..$length ];