$ perl -Mstrict -wle'
my %hash = ( key => undef);
push @{ $hash{key} }, 23;'
$