sub display_form{
        my $error_message = shift;
        my $searchfield = shift;

print $co->start_form(
                      -method=>'POST',
                      -action=>"http://mywebserver/cgi-bin/script1.cgi",
                      ),
.
.
. #loads of extra stuff here
.
.
$co->hidden( -name=>'submit', -value=> "Submit"),
),
$co->end_form(),