Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: •Re: Generalising Forms from CGI.pm

by Cody Pendant (Prior)
on Feb 19, 2003 at 20:54 UTC ( #236811=note: print w/ replies, xml ) Need Help??


in reply to •Re: Generalising Forms from CGI.pm
in thread Generalising Forms from CGI.pm

Thanks merlyn, that's just the kind of thing I was aiming for (though I don't need more than one page).

Just for the benefit of other monks, merlyn's column includes this:

sub DEFAULT_FIELD { textfield(shift, "", 60) }
as the way fields are produced unless specifically over-ridden, and the tables are produced like this:
print table({ Border => 1, Cellpadding => 5 }, map { Tr( th($_->[1]), td(($_->[2] || \&DEFAULT_FIELD)->($_->[0])) )} @info );
where the details of the form are in the @info array.

Update: you know what's occurring to me? The details of the form (arrays of arrays for the most part) could easily be stored in XML -- I'm sure if the column were written today that might have come up.
--

“Every bit of code is either naturally related to the problem at hand, or else it's an accidental side effect of the fact that you happened to solve the problem using a digital computer.”
M-J D


Comment on Re: •Re: Generalising Forms from CGI.pm
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://236811]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (13)
As of 2014-08-28 15:26 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (263 votes), past polls