©Mike Moxcey 1999
FieldRequiredError Subroutine
- # Pass in the name of field AS IT APPEARS ON THE FORM #
- sub FieldRequiredError {
- ($bad_field) = @_;
- print &PrintHeader;
- print &HtmlTopTut("Required Field Error");
- print "The field $bad_field is required<p>\n";
- print "Press [Back] button and enter the information.\n";
- print &HtmlBotTut;
- exit;
- }
home
next