Select Code to Download

my %actions = (
  invite => sub { ... },
...
);
my $action = $cgi->param('action');
$actions{$action}->() if exists $actions{$action};