if ( $cgi_query->param('action') eq 'sub_1' ) {
    sub_1();
} elsif ( $cgi_query->param('action') eq 'sub_2' ) {
    sub_2();
} else {
    default_sub();
}