01
HASH(0xbc864)
...
02
HASH(0xcd5c4)
...
03
HASH(0xcd6cc)
...
と、よくわからないものが返ってきてしまいます…

%kind01 = ( "エンピツ" => 100, "消しゴム" => 80 );
としておいて
$i = '01';
　while(($name,$price) = each(%kind$i)){　　print "$name $price<BR>\n";　}
としてもエラーになってしまいます。
どのようにするのがベターなのでしょうか…