CGI::QuickForm 1.93

CGI::QuickForm is a Perl module that provides a quick and simple mechanism for providing on-line CGI forms.<br /><br />When show_form executes it presents the form with the fields requested. As you can see from the minimal example at the beginning of the synopsis it will default everything it possibly can to get you up and running as quickly as possible.<br /><br />If you have specified any validation it will validate when the user presses the submit button. If there is an error it will re-present the form with the erroneous fields marked and with all the data entered in tact. This is repeated as often as needed. Once the user has corrected all errors and the data is valid then your &on_valid_form subroutine will be called so that you can process the valid data in any way you wish.<br /><br />Note that EXAMPLE #1 and EXAMPLE #2 are in this pod; example1, example2, etc. are supplied as files.<br /><br />SYNOPSIS<br /><br /> # Minimal example. (Insecure no error checking.)<br /><br /> #!/usr/bin/perl -w<br /> use strict ;<br /> use CGI qw( :standard :html3 ) ;<br /> use CGI::QuickForm ;<br /><br /> show_form(<br /> -ACCEPT => &on_valid_form, # You must supply this subroutine.<br /> -TITLE => 'Test Form',<br /> -FIELDS => [<br /> { -LABEL => 'Name', }, # Default field type is textfield.<br /> { -LABEL => 'Age', }, # Stored in param( 'Age' ).<br /> ],<br /> ) ;<br /><br /> sub on_valid_form {<br /> my $name = param( 'Name' ) ;<br /> my $age = param( 'Age' ) ;<br /> open PEOPLE, ">>people.tab" ;<br /> print PEOPLE "$name $age<br />" ;<br /> close PEOPLE ;<br /> print header, start_html( 'Test Form Acceptance' ),<br /> h3( 'Test Form Data Accepted' ),<br /> p( "Thank you $name for your data." ), end_html ;<br /> }<br /><br /><br /> # All QuickForm options (aide memoir)<br /><br /> #!/usr/bin/perl -w<br /> use strict ;<br /> use CGI qw( :standard :html3 ) ;<br /> use CGI::QuickForm ;<br /><br /> show_form(<br /> -ACCEPT => &on_valid_form,<br /> -BORDER => 0,<br /> -FOOTER => undef,<br /> -HEADER => undef,<br /> -INTRO => undef,<br /> -LANGUAGE => 'en',<br /> -USER_REQUIRED => undef,<br /> -USER_INVALID => undef,<br /> -TITLE => 'Test Form',<br /> -REQUIRED_HTML => '+',<br /> -INVALID_HTML => '*',<br /> -VALIDATE => undef, # Set this to validate the entire record<br /> -SIZE => undef,<br /> -MAXLENGTH => undef,<br /> -ROWS => undef,<br /> -COLUMNS => undef,<br /> -CHECK => 1,<br /> -SPACE => 0, # Output some newlines to assist debugging if 1<br /> -MULTI_COLUMN => 0,<br /> -NAME => undef,<br /> -onsubmit => undef,<br /> -JSCRIPT => {},<br /> -STYLE_FIELDNAME => '',<br /> -STYLE_FIELDVALUE => '',<br /> -STYLE_BUTTONS => '',<br /> -STYLE_ROW => '',<br /> -STYLE_WHY => '',<br /> -TABLE_OPTIONS => '',<br /> -FIELDS => [<br /> {<br /> -LABEL => 'Personal Details',<br /> -HEADLINE => 1,<br /> -STYLE_FIELDNAME => '',<br /> -COLSPAN => 2,<br /> -END_ROW => 1,<br /> },<br /> {<br /> -LABEL => 'Name',<br /> -START_ROW => 1,<br /> -END_ROW => 1,<br /> -COLSPAN => 1,<br /> -REQUIRED => undef,<br /> -TYPE => 'textfield',<br /> -VALIDATE => undef, # Set this to validate the field<br /> -CLEAN => undef, # Set this to clean up valid data<br /> -DESC => undef,<br /> -STYLE_FIELDNAME => '', # If set over-rides form-level setting<br /> -STYLE_FIELDVALUE => '', # If set over-rides form-level setting<br /> -STYLE_ROW => '', # If set over-rides form-level setting<br /> # Lowercase options are those supplied by CGI.pm<br /> -name => undef, # Defaults to -LABEL's value.<br /> -default => undef,<br /> -size => 30,<br /> -maxlength => undef,<br /> },<br /> # For all others: same QuickForm options as above<br /> # and all CGI.pm options (which vary with -TYPE) available<br /> {<br /> -LABEL => 'Address',<br /> -TYPE => 'textarea',<br /> -rows => 3,<br /> -columns => 40,<br /> },<br /> {<br /> -LABEL => 'Password',<br /> -TYPE => 'password_field',<br /> },<br /> {<br /> -LABEL => 'Hair colour',<br /> -TYPE => 'scrolling_list',<br /> '-values' => [ qw( Red Black Brown Grey White ) ],<br /> -size => 1,<br /> -multiples => undef,<br /> },<br /> {<br /> -LABEL => 'Worst Sport',<br /> -TYPE => 'radio_group',<br /> -values => [ qw( Boxing Cricket Golf ) ],<br /> -default => 'Golf',<br /> },<br /> # Any other CGI.pm field can be used in the same way.<br /> ],<br /> -BUTTONS => [<br /> { -name => 'Add' },<br /> { -name => 'Edit' },<br /> { -name => 'List' },<br /> { -name => 'Remove' },<br /> { -name => 'Clear', -DEFAULTS => 1 },<br /> ],<br /> ) ;<br />

Requirements:	No special requirements
Platforms:	*nix, Linux
Keyword:	Cgipm,  Cgiquickform 1 93,  Default,  Field,  Formlevel,  Label,  Options,  Overrides,  Param,  Setting,  Undef,  Valid,  Validate
Users rating:	0/10