#!/usr/bin/perl -wT
use strict;
use CGI qw/:standard/;
$|++;
print header, start_html;
###
### Generate your page - everything up to the
you want - here
###
if (my $search = param('search')){
###
### Retrieve the results based on the search term
###
print div("search_results go here");
}
###
### The content you want after the search
goes here
###
print end_html;