斑竹帮忙删了这个吧关于散列自加，也许很简单的一个问题，但是想不明白，求教

#!/usr/bin/perl -w
use strict;
use warnings;
my @people=qw/hwllo hello yaya llll hwllo hwllo baby llll/;
foreach (@people)
{
    print "数组的内容是:\n";
    print"$_\n";
    }
my %count;
#$count{$_}++ foreach(@people);
print "test hash##########\n";
foreach(@people)
{
    print "($_)\n";
    #my $hash_val=$count{$_};
    #print "now hash is: $hash_val\n";
    print "now hashh ishash_val\n";
   $count{$_}++;
    #$count{$_}=$count{$_};
    #$count{$_}+ 1;
    }


$count{$_}++;这里到底是怎么处理的呢？一直想不明白

在线等

难道是太简单，大家都不想回答？

什么怎么处理的？？不明白你想问什么？