hi,

I am interested in knowing the best way to generate forms w/ mod_perl.  At
the moment I use CGI.pm in combination w/ mod_perl.  But I am not sure I
am using it correctly or if it's the best way.

Perhaps I should just use a HTML::Template?

Here is a bit of the output code from my prg:
$r->content_type("text/html");
$r->send_http_header;

    print start_form();

    $r->print ("What is the domain name: ", textfield("domain"), "\n");
    $r->print ("<br>");
    $r->print ("What would you like done?:\n");

    $r->print ("<br>");
    $r->print (checkbox(-name=>'email',
            -checked=>'checked',
            -value=>'ON',
            -label=>'Virtual Mail/Exim'));
    $r->print ("<br>");
    $r->print (checkbox(-name=>'bind',
            -checked=>'checked',
            -value=>'ON',
            -label=>'DNS/Bind'));
    $r->print ("<br>");
    $r->print (checkbox(-name=>'apache',
            -checked=>'checked',
            -value=>'ON',
            -label=>'Virtual Web/Apache'));

    $r->print ("<br>");
    print submit(-NAME => ".State", -VALUE => "Next");

    print print end_form(), hr();
    print end_html();

Thanks.
J.

Reply via email to