if循环，hash数组自增问题

CODE:

open FH,"</var/log/httpd/test" || die "not open";
while(<FH>){
my $ip=$_;
chop ($ip);

my %hash;
         if($hash{"$ip"}<1){
              $hash{"$ip"}++;
              print values%hash;
              print "$ip\n";}

}
close (FH);

test文件格式如下：
aa
aa
aa
cc
dd

输出为：
1aa
11cc
111dd

可是程序的输入不解 ：）