Тут так же самая разница:
>
> #!/usr/bin/perl
>
> my %count;
> my $a;
> for(1..100)
> {
> $a = {};
> print $_,' ', $a, "\n";
> # $count{$a}++; # Вот эта строка
> }
>
> print "\n\n\n";
> print %count;
>
И правда, но откуда эта разница - Вот основной вопрос.