- or download this
$co->submit(-name=>'edit', -value=>'edit'),
$co->submit(-name=>'preview', -value=>'preview'),
- or download this
my $name=>$co->param('name');
if ($name eq 'edit'){
...
elsif($name eq 'preview'){
$string="http://mywebserver/cgi-bin/preview.cgi";
}
- or download this
$co->start_form(-method=>'POST', -action=>"$string"),