foreach my $cell (keys %hashCellname) { print "$cell count = $hashCellname{$cell}\n"; }