Select Code to Download

if ($command eq "add") {
 ....
...
.
.
}

%menus = (
   'first' => { 
...
                'print' => '&print',
               },
);

$menus{first}{$_} if exists $menus{first}{$_};

or

print "Command not found.\n" if not exists $menus{first}{$_};