SourceForge.jp（http://sourceforge.jp/）がメンテ中だよ〜

my %hoge = ('id'=>'hoge');&moge(\%hoge); exit;sub moge() { my ($hoge) = @_; print $hoge->{'id'}; my @h_keys = keys(%$hoge); } デリファレンスは $hoge : $$hoge @hoge : @$hoge %hoge : %$hoge