Re: Obtaining number of counts per each name in hash

[jeffa]

You want to increment the value of the key as each occurrence is found:

$name{$hashkey}++;

And then later:

print "$_  $name{$_}\n" for keys %name;

You could trim up your code a bit as well:

if ($line =~ /(\S+)/) {
   $name{$1}++;
}