プリントすると 保存位置が表示される

質問

%classをプリントしたいのですが、
保存位置が表示されるだけで肝心の中身が出てきません。
どうしたら　表示できますか？

前略
push @{$class{$name}->{grade}}, @grade
とやって保存し、以下で表示させようとしました。

foreach my $key (sort keys(%class)) {
print "$key:";
my @values = %{input{$key}};
print join',', @values;
print ".\n";
}

回答No.1

bgbg

printするだけならData::Dumperを使うのが一番手っ取り早いです。

use Data::Dumper;
print Dumper(\%class);

自力で表示するなら、リファレンスになっている変数の頭に'$'なり'@'なり'%'なり付加します。（リファレンスがスカラーか配列かハッシュかによって頭につける文字を変えてください）