my @array1 = ( 'abc', 'def', 'ghi', 'jkl' ); my $s1 = \@array1; my $s2 = \$s1; my %hash = ( 'key' => $s1 ); my $hash_s = \%hash; print(@$$s2); # works print(@$$hash{'key'}); # doesn't work