sub display_error {
my $html_title = $_[0];
my $error = $_[1];
print $cgi->start_html(-title=>"Error: $html_title").
      $cgi->h3($error).
      $cgi-end_html();
}