$ perl -wMstrict -MData::Dump -e'  my $x = $#{$$a{list}};  dd $a'
{ list => [] }
$ perl -wMstrict -MData::Dump -e'  my $x = $#{@$a{list}};  dd $a'
Can't use an undefined value as an ARRAY reference at -e line 1.