use Data::Dump::Streamer;
$hoa = {a => [1,2],  'b'=>[1,3], c=> [2,0]};
print Dump($hoa);
 print "\n";