Thanks to all of your with your help. I really appreciate your time and suggestions. I implemented the suggestion you made. However, it gives me error.
The partial program as below gives me this error:
syntax error at carsearch2.cgi line 7, near ") {"
syntax error at carsearch2.cgi line 8, near "}"
Execution of carsearch2.cgi aborted due to compilation errors.
eval {
open(GUEST, "<car.out") or dienice("Couldn't open auto.out for reading: $! \n");
while (<GUEST>) {
chomp;
($name,$add,$city,$state,$zip,$make,$photo,$model,$color,$mile,$eyear,$price,$email,$tele,$time,$comment1,$month,$day,$year)=split/\|/;
}
if (EOF) {
if ($yes eq 'no') {
print "<h2>Your match was not found. You may want to get back to the previous website and list the whole file or change your specifications. <br>";
print "<a href=\"/search.html\">Go Back to the Search Page</a><br>";
print "<a href=\"/sort.html\">Go Back to the Home Page</a></h2>";
}
}
}
}