my $p = \%hash; ... $p = $p->{$item};