bcp has asked for the wisdom of the Perl Monks concerning the following question:
Content-Type: text/html; charset=ISO-8859-1 <html><head></head><body> <h1> Welcome! </h1> Please enter your first and last name <form method="post" action="" enctype="multipart/form-data"> <input type="text" name="first" tabindex="1" /> <input type="text" name="last" tabindex="2" /> <input type="submit" tabindex="3" name=".submit" /> ARRAY(0x105f5abc) </body></html>
#! /usr/bin/perl -w use diagnostics; use strict; use MyApp; MyApp->activate;MyApp.pm
package MyApp;
use base CGI::Prototype;
use MyApp::One;
sub dispatch {
my $self = shift;
return 'MyApp::One';
}
1;MyApp/One.pm
package MyApp::One;
use base MyApp;
sub template { 'forms/the_form.tt' }
1;
[% self.CGI.header %]<html><head></head><body>
<h1> Welcome! </h1>Please enter your first and last name
[% self.CGI.start_form; self.CGI.textfield('first');
self.CGI.textfield('last'); self.CGI.submit;
self.CGI.end_form %]
</body></html>
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: CGI::Prototype puts an array ref in html form?
by merlyn (Sage) on Sep 12, 2005 at 17:09 UTC |