Sponsoring The Perl Toolchain Summit 2025: Help make this important event another success Learn more

 / 
Template-Plugin-HTML-SuperForm-1.0
River stage one • 1 direct dependent • 4 total dependents
/ Template::Plugin::HTML::SuperForm

NAME

Template::Plugin::HTML::SuperForm - Template Plugin for HTML::SuperForm

SYNOPSIS


            

              
              
[% USE form = HTML.SuperForm %]
[% form.text(name => 'my_text', default => 'default text') %]

DESCRIPTION

This is an interface into HTML::SuperForm through the Template Toolkit. When created without arguments (i.e. [% USE form = HTML.SuperForm %]), the Template's stash is searched for an Apache object or a CGI object to pass to HTML::SuperForm's constructor.

When created with arguments (i.e. [% USE form = HTML.SuperForm(arg) %]), the arguments are passed to HTML::SuperForm's constructor.

USES

With mod_perl:


            

              
              
myHandler.pm:
package myHandler;
use Apache::Constants qw(OK);
use Template;
sub handler {
    my $r = shift;
    my $tt = Template->new();
    $r->content_type('text/html');
    $r->send_http_header();
    $tt->process('my_template.tt', { r => $r });
    return OK;
}
my_template.tt:
[% USE form = HTML.SuperForm %]
<html>
<body>
    [% form.start_form(name => 'my_form') %]
    [% form.text(name => 'my_text', default => 'default text') %]
    [% form.submit %]
    [% form.end_form %]
</body>
</html>

With CGI:


            

              
              
cgi-script:
use Template;
print "Content-Type: text/html\n\n";
my $tt = Template->new();
$tt->process('my_template.tt');
my_template.tt:
[% USE CGI %]
[% USE form = HTML.SuperForm %]
<html>
<body>
    [% form.start_form(name => 'my_form') %]
    [% form.text(name => 'my_text', default => 'default text') %]
    [% form.submit %]
    [% form.end_form %]
</body>
</html>

Without CGI or mod_perl:


            

              
              
cgi-script:
use Template;
print "Content-Type: text/html\n\n";
my $tt = Template->new();
$tt->process('my_template.tt');
my_template.tt:
[% USE form = HTML.SuperForm %]
<html>
<body>
    [% form.start_form(name => 'my_form') %]
    [% form.text(name => 'my_text', default => 'default text') %]
    [% form.submit %]
    [% form.end_form %]
</body>
</html>

SEE ALSO

HTML::SuperForm

AUTHOR

John Allwine <jallwine86@yahoo.com>