#!/usr/bin/perl -w
###############################################################################
# Author: Srikanth. S.
# Title: searchinter.pl
# Date : 27 DEC 2005
# Purpose: Scripts search Results
# category.
# Required Modules: CGI,DBI
use strict;
use CGI qw(fatalsToBrowser); # send fatal error messages to the browser
use DBI;
use CGI qw(:standard);
print "Content-type: text/html \n\n";
print "";
print " Intermodel.net ";
print '';
print "";
print "";
print "
Enter Your Search Criteria
";
my @row;
my $q = new CGI; # create new CGI object and store it in $q
my $script = $q->script_name;
print '';
print '';
print '';
print '';
print "";
print "