Select Code to Download

my %act1 = (
           "food"  => "eat it",
...
             my $useritem = $vars{ $2 };
             $actions{$1}{$useritem}
         }gxe;