$ perl  -le " no autovivification qw/ strict fetch /; my $f; keys @$f;
Reference vivification forbidden at -e line 1.

$ perl  -le " no autovivification qw/ warn fetch /; my $f; keys @$f;
Reference was vivified at -e line 1.