Select Code to Download

print   header(),
        start_html(-title=>$title, -bgcolor=>"cyan"),
...
                -method=>"GET",
                -onsubmit=>"return checkForm( this )"
);

# ------------------------------
# Display Application Menu.
...
);

set_apx(); # Sort-of works here as planned.

print br(),
submit(-name=>"action", -value=>"Start Application"),
...
end_html();
$dbh->disconnect();
exit(0);

# ----------------------------------------------------
sub set_apx { # Generate some JavaScript here:
...
                document.apps_menu.action=apps_menu['ap_name'].value;
        // --></script>);
}