... if ($cgi->param('action-add')) { # do something ... } elsif ($cgi->param('action-edit')) { ... etc