in reply to Re: Formatting CGI
in thread Formatting CGI
thx again,#!/usr/bin/perl use CGI qw/:standard :html3/; print header, start_html("Soft Bug Buddy"), $action = param('action'); print_bugform(); sub print_bugform { print start_form; print table({-border=>''}, Tr({-align=>CENTER, -valign=>TOP}, [ th([ print submit(-name=>'action',-value=>'whatever'), print submit(-name=>'action',-value=>'whomever'), print submit(-name=>'action',-value=>'wherever'), 'Some kind of text', print submit(-name=>'action',-value=>'quit') ]) ] )); }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
RE: RE: Re: Formatting CGI
by btrott (Parson) on Apr 07, 2000 at 00:18 UTC | |
by Anonymous Monk on Apr 07, 2000 at 00:36 UTC |