CGI::FormBuilder::Template::HTC
my $form = CGI::FormBuilder->new(
fields => \@fields,
template => {
type => 'HTC',
filename => 'form.tmpl',
variable => 'form',
# other HTC options
},
data => {
# other parameters for the template object
},
);
This engine adapts FormBuilder to use the HTML::Template::Compiled manpage. It works similar to the CGI::FormBuilder::Template::TT2 manpage, not like the CGI::FormBuilder::Template::HTML manpage, because HTC can use the dot-syntax for accessing hash-keys.
Returns the the HTML::Template::Compiled manpage object.
Uses the prepared hash and expands the template, returning a string of HTML.
Returns the class of the template engine (HTML::Template::Compiled)
The template might look something like this (this is HTC syntax):
<html>
<head>
<title>[%= form.title %]</title>
[%= form.jshead %]
</head>
<body>
[%= form.start %]
<table>
[%loop form.fields %]
<tr valign="top">
<td>
[%if required %]
<b>[%= label %]</b>
[%else %]
[%= label %]
[%/if %]
</td>
<td>
[%if invalid %]
Missing or invalid entry, please try again.
<br/>
[%/if %]
[%= field %]
</td>
</tr>
[%/loop %]
<tr>
<td colspan="2" align="center">
[%= form.submit %] [%= form.reset %]
</td>
</tr>
</table>
[%= form.end %]
</body>
</html>
By default, all the form and field information are accessible through simple variables.
[%= jshead %] - JavaScript to stick in <head>
[%= title %] - The <title> of the HTML form
[%= start %] - Opening <form> tag and internal fields
[%= submit %] - The submit button(s)
[%= reset %] - The reset button
[%= end %] - Closing </form> tag
[%= fields %] - List of fields
[%= field %] - Hash of fields (for lookup by name)
You can specify the variable option to have all these variables accessible under a certain namespace. For example:
my $form = CGI::FormBuilder->new(
fields => \@fields,
template => {
type => 'HTC',
filename => 'form.tmpl',
variable => 'form'
},
);
With variable set to form the variables are accessible as:
[%= form.jshead %]
[%= form.start %]
etc.
You can access individual fields via the field variable.
For a field named... The field data is in...
-------------------- -----------------------
job [%= form.field.job %]
size [%= form.field.size %]
email [%= form.field.email %]
Each field contains various elements. For example:
[%with form.field.email %]
[%= label %] # text label
[%= field %] # field input tag
[%= value %] # first value
[%= values %] # list of all values
[%= option %] # first value
[%= options %] # list of all values
[%= required %] # required flag
[%= invalid %] # invalid flag
[%/with %]
The fields variable contains a list of all the fields in the form. To iterate through all the fields in order, you could do something like this:
[%loop form.fields %]
<tr>
<td>[%= label %]</td> <td>[%= field %]</td>
</tr>
[%/loop %]
If you want to customise any of the HTC options, you can
add options to the template option. You can also set the data
item to define any additional
variables you want accesible when the template is processed.
my $form = CGI::FormBuilder->new(
fields => \@fields,
template => {
type => 'HTC',
filename => 'form.tmpl',
variable => 'form',
# other HTC options
cache_dir => '/path/to/cachedir',
},
data => {
version => 1.23,
author => 'Fred Smith',
},
);
For further details on using the Template Toolkit, see
Tina Mueller
Nate Wiger, who is the author of the CGI::FormBuilder manpage. I copied more or less the whole documentation and some of the tests.
pfuschi from perl-community.de for the idae
Copyright (C) 2006 by Tina Mueller
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.3 or, at your option, any later version of Perl 5 you may have available.