The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
<html>
<title>User Info</title>
Please update your info and hit "Submit".
<script type="text/javascript"><!-- hide from old browsers
function validate (form) {
    var alertstr = '';
    var invalid  = 0;
    var invalid_fields = new Array();

    // color: radio group or multiple checkboxes
    var color = null;
    var selected_color = 0;
    for (var loop = 0; loop < form.elements['color'].length; loop++) {
        if (form.elements['color'][loop].checked) {
            color = form.elements['color'][loop].value;
            selected_color++;
            if (color == null || (color != 'red' && color != 'blue' && color != 'yellow' && color != 'pink')) {
                alertstr += '- Check one or more of the "Color" options\n';
                invalid++;
                invalid_fields.push('color');
            }
        } // if
    } // for color
    if (! selected_color) {
        alertstr += '- Check one or more of the "Color" options\n';
        invalid++;
    }

    if (invalid > 0 || alertstr != '') {
        if (! invalid) invalid = 'The following';   // catch for programmer error
        alert(''+invalid+' error(s) were encountered with your submission:'+'\n\n'
                +alertstr+'\n'+'Please correct these fields and try again.');
        return false;
    }
    return true;  // all checked ok
}
//-->
</script>
<p>
<form action="TEST" method="get" onsubmit="return validate(this);"><input id="_submitted" name="_submitted" type="hidden" value="1" />
Enter your name: <input id="name" name="name" type="text" />
FYI, your dress size is (unknown)<br>
 <input id="_submit" name="_submit" onclick="this.form._submit.value = this.value;" type="submit" value="Update" /><input id="_submit_2" name="_submit" onclick="this.form._submit.value = this.value;" type="submit" value="Delete" />
</form>