}

}

# use Data::Dumper; print STDERR "-" x 25, "\n", Dumper($results_hashref);

# use Data::Dumper; print STDERR "-" x 25, "\n", Dumper($results_hashref);

    $template->param(query_error => $error.$@);

    $template->param(query_error => $error.$@);

    output_html_with_http_headers $cgi, $cookie, $template->output;

    output_html_with_http_headers $cgi, $cookie, $template->output;

    exit;

    exit;