$ perl -e " use Data::Dump; $totalhash{hello}{world}[1]=9; dd \%totalhash; dd $totalhash{hello}{world}[1]; " { hello => { world => [undef, 9] } } 9