Select Code to Download

no autovivification;

no autovivification qw( fetch exists delete );

$_ = uc($_) for @a;

no autovivification qw( fetch exists delete store );

$ perl -e'
   use Data::Dumper;
...
          'k' => []
        };
Can't vivify reference at a.pl line 14.