for my $hash_count ( sort {$a<=>$b} keys %hash){
print  "($hash_count)-> @{$hash{$hash_count}}\n";
}