Some more non-searches to remove,
and just to see who searches for preteen and lolita, lets log his IP:

unless (($pod_searchwords eq "0") or ($pod_searchwords =~ "1") or ($pod_searchwords =~ "26") or ($pod_searchwords =~ "76") or ($pod_searchwords =~ "cgi-bin") or ($pod_searchwords =~ "^\&") or ($pod_searchwords =~ "^\/"))
{
open (WRITEIT, ">>$pod_logging");
flock(WRITEIT, LOCK_EX);
print WRITEIT "$datej|$pod_searchwords\&$ENV{'REMOTE_ADDR'}\n";
close(WRITEIT);
}