if ($cgi->param('action') eq 'foo') {
  foo();
}