Select Code to Download

# Process form if submitted; otherwise display it
if ($co->param("submit")){
...
                return 1;
        }
}

sub display_form{
        my $error_message = shift;
...
$co->hidden( -name=>'submit', -value=> "Submit"),
),
$co->end_form(),