Help for this page
open (SIDX, "$data_dir/search.idx"); open (SIDX2, "$data_dir/search2.idx"); ... if ($toadk eq "true") {
$resultline[$icnt] = $line; ... close (SIDX2); }