20660	Gekko Gear	Selection of winter sports apparel	Apparel_and_Accessories-Athletic_Clothing	www.gekkogear.com/		


##</code><code>##

use Fcntl qw(:DEFAULT :flock);
use CGI;
use CGI::Carp qw(fatalsToBrowser);


##</code><code>##


	$main_template =~ s/%%keywords%%/$fields{'keywords'}/g;
	$main_template =~ s/%%searcresults%%/$pitem/g;

##</code><code>##

	$main_template =~ s/%%keywords%%/$fields{'keywords'}/g;
	$main_template =~ s/%%premiumlistings%%/$premiumitem/g;

##</code><code>##

sub normal_search
{

### PERFORM SEARCH

$search_line = $fields{'keywords'};
$icnt = 0;
$toadk = "";

(@skeyw) = split(/ /,$search_line);
$nrkeywords = 0;
foreach $item (@skeyw){$nrkeywords++;}

open (SIDX, "$data_dir/search.idx");


added code below to open 2nd file


open (SIDX2, "$data_dir/search2.idx");



 if ($file_locking ne "No"){flock (SIDX, LOCK_SH) or die "Can't set 
lock for file: $data_dir/search.idx, $data_dir/search2.idx $!\n";}

##</code><code>##

	while (defined($line=<SIDX>))
	{
	$sline = $line;
	
	foreach $kwr (@skeyw)
		{

		if (($sline =~ /$kwr/i) and ($kwr ne ""))
			{
			$toadk = "true";
			}
			
		}

		if ($toadk eq "true")
			{
			$resultline[$icnt] = $line;
			$toadk = false;
			$icnt++;
			}

	}
 #if ($file_locking ne "No"){flock (CIT, LOCK_UN);}
close (SIDX);

}

##</code><code>##

$resultline[$rcc] = $row[0] . "\t" .
                    $row[1] . "\t" .
                    $row[2] . "\t" .
                    $row[3] . "\t" .
                    $row[4] . "\t" .
                    $row[5] . "\t" .
                    $row[6] . "\t" . 
                    $row[7] . "\t" . 
                    $row[8] . "\t" . 
                    $kinclude . "\n";

$rcc++;
}

$sth->finish;
$dbh->disconnect;