Help for this page
my $cgi = new CGI; $my_code->{$cgi->param("action"))->($cgi);
my $req = FCGI::Request(...); ... $my_code->{$cgi->param("action"))->($cgi); }