(file) Return to search_engines.pm CVS log (file) (dir) Up to [RizwankCVS] / geekymedia_web / awstats-6.3 / wwwroot / cgi-bin / lib

  1 rizwank 1.1 # AWSTATS SEARCH ENGINES DATABASE
  2             #------------------------------------------------------------------------------
  3             # If you want to add a Search Engine to extend AWStats database detection capabilities,
  4             # you must add an entry in SearchEnginesSearchIDOrder, SearchEnginesHashID and in
  5             # SearchEnginesHashLib.
  6             # An entry if known in SearchEnginesKnownUrl is also welcome.
  7             #------------------------------------------------------------------------------
  8             # $Revision: 1.31 $ - $Author: eldy $ - $Date: 2004/11/10 23:10:27 $
  9             
 10             
 11             #package AWSSE;
 12             
 13             
 14             # SearchEnginesSearchIDOrder
 15             # It contains all matching criteria to search for in log fields. This list is
 16             # used to know in which order to search Search Engines IDs.
 17             # Most frequent one are in list1, used when LevelForSearchEnginesDetection is 1 or more
 18             # Minor robots are in list2, used when LevelForSearchEnginesDetection is 2 or more
 19             # Note: Regex IDs are in lower case and ' ' and '+' are changed into '_'
 20             #------------------------------------------------------------------------------
 21             @SearchEnginesSearchIDOrder_list1=(
 22 rizwank 1.1 # Major internationnal search engines
 23             'images\.google\.',
 24             'google\.','216\.239\.(35\.101|37\.101|39\.100|39\.101|51\.100|51\.101|35\.100)',
 25             'msn\.',
 26             'voila\.',
 27             'yahoo\.','(66\.218\.71\.225|216\.109\.117\.135)',
 28             'search\.aol\.co',
 29             'tiscali\.',
 30             'lycos\.',
 31             'alexa\.com',
 32             'alltheweb\.com',
 33             'altavista\.',
 34             'a9\.com',
 35             'dmoz\.org',
 36             'netscape\.',
 37             'search\.terra\.',
 38             'www\.search\.com',
 39             'search\.sli\.sympatico\.ca', 
 40             'excite\.'
 41             );
 42             
 43 rizwank 1.1 @SearchEnginesSearchIDOrder_list2=(
 44             # Minor internationnal search engines
 45             'northernlight\.',
 46             'hotbot\.',
 47             'kvasir\.',
 48             'webcrawler\.',
 49             'metacrawler\.',
 50             'go2net\.com',
 51             '(^|\.)go\.com',
 52             'euroseek\.',
 53             'looksmart\.',
 54             'spray\.',
 55             'nbci\.com/search',
 56             '(^|\.)ask\.com',
 57             'atomz\.',
 58             'overture\.com',		# Replace 'goto\.com','Goto.com',
 59             'teoma\.',
 60             'findarticles\.com',
 61             'infospace\.com',
 62             'mamma\.',
 63             'dejanews\.',
 64 rizwank 1.1 'dogpile\.com',
 65             'wisenut\.com',
 66             'ixquick\.com',
 67             'search\.earthlink\.net', 
 68             'i-une\.com',
 69             # Minor brazilian search engines
 70             'engine\.exe', 'miner\.bol\.com\.br',
 71             # Minor chinese search engines
 72             'baidu\.com','search\.sina\.com','search\.sohu\.com',
 73             # Minor czech search engines
 74             'atlas\.cz','seznam\.cz','quick\.cz','centrum\.cz','jyxo\.(cz|com)','najdi\.to','redbox\.cz',
 75             # Minor danish search-engines 
 76             'opasia\.dk', 'danielsen\.com', 'sol\.dk', 'jubii\.dk', 'find\.dk', 'edderkoppen\.dk', 'netstjernen\.dk', 'orbis\.dk', 'tyfon\.dk', '1klik\.dk', 'ofir\.dk',
 77             # Minor dutch search engines
 78             'ilse\.','vindex\.',
 79             # Minor english search engines
 80             '(^|\.)ask\.co\.uk','bbc\.co\.uk/cgi-bin/search','ifind\.freeserve','looksmart\.co\.uk','mirago\.','splut\.','spotjockey\.','ukdirectory\.','ukindex\.co\.uk','ukplus\.','searchy\.co\.uk',
 81             # Minor finnish search engines
 82             'haku\.www\.fi',
 83             # Minor french search engines
 84             'recherche\.aol\.fr','ctrouve\.','francite\.','\.lbb\.org','rechercher\.libertysurf\.fr', 'search[\w\-]+\.free\.fr', 'recherche\.club-internet\.fr',
 85 rizwank 1.1 # Minor german search engines
 86             'sucheaol\.aol\.de',
 87             'fireball\.de','infoseek\.de','suche\d?\.web\.de','[a-z]serv\.rrzn\.uni-hannover\.de',
 88             'suchen\.abacho\.de','brisbane\.t-online\.de','allesklar\.de','meinestadt\.de',
 89             '212\.227\.33\.241',
 90             '(161\.58\.227\.204|161\.58\.247\.101|212\.40\.165\.90|213\.133\.108\.202|217\.160\.108\.151|217\.160\.111\.99|217\.160\.131\.108|217\.160\.142\.227|217\.160\.176\.42)',
 91             # Minor hungarian search engines
 92             'heureka\.hu','vizsla\.origo\.hu','lapkereso\.hu','goliat\.hu','index\.hu','wahoo\.hu','webmania\.hu','search\.internetto\.hu',
 93             # Minor italian search engines
 94             'virgilio\.it',
 95             # Minor norvegian search engines
 96             'sok\.start\.no',
 97             # Minor polish search engines
 98             'szukaj\.wp\.pl',
 99             # Minor russian search engines
100             'ya(ndex)?\.ru', 'aport\.ru', 'rambler\.ru', 'turtle\.ru', 'metabot\.ru',
101             # Minor swedish search engines
102             'evreka\.passagen\.se',
103             # Minor swiss search engines
104             'search\.ch', 'search\.bluewin\.ch'
105             );
106 rizwank 1.1 @SearchEnginesSearchIDOrder_listgen=(
107             # Generic search engines
108             'search\..*\.\w+'
109             );
110             
111             
112             # NotSearchEnginesKeys
113             # If a search engie key is found, we check its exclude list to know if it's
114             # really a search engine
115             #------------------------------------------------------------------------------
116             %NotSearchEnginesKeys=(
117             'msn\.'=>'hotmail\.msn\.',
118             'yahoo\.'=>'mail\.yahoo\.'
119             );
120             
121             
122             # SearchEnginesHashID
123             # Each Search Engine Search ID is associated to an AWStats id string
124             #------------------------------------------------------------------------------
125             %SearchEnginesHashID = (
126             # Major internationnal search engines
127 rizwank 1.1 'images\.google\.','google_image',
128             'google\.','google','216\.239\.(35\.101|37\.101|39\.100|39\.101|51\.100|51\.101|35\.100)','google',
129             'msn\.','msn',
130             'voila\.','voila',
131             'yahoo\.','yahoo','(66\.218\.71\.225|216\.109\.117\.135)','yahoo',
132             'lycos\.','lycos',
133             'alexa\.com','alexa',
134             'alltheweb\.com','alltheweb',
135             'altavista\.','altavista',
136             'a9\.com','a9',
137             'dmoz\.org','dmoz',
138             'netscape\.','netscape',
139             'search\.terra\.','terra',
140             'www\.search\.com','search.com',
141             'tiscali\.','tiscali',
142             'search\.aol\.co','aol',
143             'search\.sli\.sympatico\.ca','sympatico',
144             'excite\.','excite',
145             # Minor internationnal search engines
146             'northernlight\.','northernlight',
147             'hotbot\.','hotbot',
148 rizwank 1.1 'kvasir\.','kvasir',
149             'webcrawler\.','webcrawler',
150             'metacrawler\.','metacrawler',
151             'go2net\.com','go2net',
152             '(^|\.)go\.com','go',
153             'euroseek\.','euroseek',
154             'looksmart\.','looksmart',
155             'spray\.','spray',
156             'nbci\.com/search','nbci',
157             '(^|\.)ask\.com','ask',
158             'atomz\.','atomz',
159             'overture\.com','overture',		# Replace 'goto\.com','Goto.com',
160             'teoma\.','teoma',
161             'findarticles\.com','findarticles',
162             'infospace\.com','infospace',
163             'mamma\.','mamma',
164             'dejanews\.','dejanews',
165             'dogpile\.com','dogpile',
166             'wisenut\.com','wisenut',
167             'ixquick\.com','ixquick',
168             'search\.earthlink\.net','earthlink',
169 rizwank 1.1 'i-une\.com','iune',
170             # Minor brazilian search engines
171             'engine\.exe','engine',
172             'miner\.bol\.com\.br','miner',
173             # Minor chinese search engines
174             'baidu\.com','baidu',
175             'search\.sina\.com','sina',
176             'search\.sohu\.com','sohu',
177             # Minor czech search engines
178             'atlas\.cz','atlas',
179             'seznam\.cz','seznam',
180             'quick\.cz','quick',
181             'centrum\.cz','centrum',
182             'jyxo\.(cz|com)','jyxo',
183             'najdi\.to','najdi',
184             'redbox\.cz','redbox',
185             # Minor danish search-engines 
186             'opasia\.dk','opasia',
187             'danielsen\.com','danielsen',
188             'sol\.dk','sol',
189             'jubii\.dk','jubii',
190 rizwank 1.1 'find\.dk','finddk',
191             'edderkoppen\.dk','edderkoppen',
192             'netstjernen\.dk','netstjernen',
193             'orbis\.dk','orbis',
194             'tyfon\.dk','tyfon',
195             '1klik\.dk','1klik',
196             'ofir\.dk','ofir',
197             # Minor dutch search engines
198             'ilse\.','ilse',
199             'vindex\.','vindex',
200             # Minor english search engines
201             '(^|\.)ask\.co\.uk','askuk',
202             'bbc\.co\.uk/cgi-bin/search','bbc',
203             'ifind\.freeserve','freeserve',
204             'looksmart\.co\.uk','looksmartuk',
205             'mirago\.','mirago',
206             'splut\.','splut',
207             'spotjockey\.','spotjockey',
208             'ukdirectory\.','ukdirectory',
209             'ukindex\.co\.uk','ukindex',
210             'ukplus\.','ukplus',
211 rizwank 1.1 'searchy\.co\.uk','searchy',
212             # Minor finnish search engines
213             'haku\.www\.fi','haku',
214             # Minor french search engines
215             'recherche\.aol\.fr','aolfr',
216             'ctrouve\.','ctrouve',
217             'francite\.','francite',
218             '\.lbb\.org','lbb',
219             'rechercher\.libertysurf\.fr','libertysurf',
220             'search[\w\-]+\.free\.fr','free',
221             'recherche\.club-internet\.fr','clubinternet',
222             # Minor german search engines
223             'sucheaol\.aol\.de','aolde',
224             'fireball\.de','fireball',
225             'infoseek\.de','infoseek',
226             'suche\d?\.web\.de','webde',
227             '[a-z]serv\.rrzn\.uni-hannover\.de','meta',
228             'suchen\.abacho\.de','abacho',
229             'brisbane\.t-online\.de','t-online',
230             'allesklar\.de','allesklar',
231             'meinestadt\.de','meinestadt',
232 rizwank 1.1 '212\.227\.33\.241','metaspinner',
233             '(161\.58\.227\.204|161\.58\.247\.101|212\.40\.165\.90|213\.133\.108\.202|217\.160\.108\.151|217\.160\.111\.99|217\.160\.131\.108|217\.160\.142\.227|217\.160\.176\.42)','metacrawler_de',
234             # Minor hungarian search engines
235             'heureka\.hu','heureka',
236             'vizsla\.origo\.hu','origo',
237             'lapkereso\.hu','lapkereso',
238             'goliat\.hu','goliat',
239             'index\.hu','indexhu',
240             'wahoo\.hu','wahoo',
241             'webmania\.hu','webmania',
242             'search\.internetto\.hu','internetto',
243             # Minor italian search engines
244             'virgilio\.it','virgilio',
245             # Minor norvegian search engines
246             'sok\.start\.no','start',
247             # Minor polish search engines
248             'szukaj\.wp\.pl','wp',
249             # Minor russian search engines
250             'ya(ndex)?\.ru','yandex',
251             'aport\.ru','aport',
252             'rambler\.ru','rambler',
253 rizwank 1.1 'turtle\.ru','turtle',
254             'metabot\.ru','metabot',
255             # Minor swedish search engines
256             'evreka\.passagen\.se','passagen',
257             # Minor swiss search engines
258             'search\.ch','searchch',
259             'search\.bluewin\.ch','bluewin',
260             # Generic search engines
261             'search\..*\.\w+','search'
262             );
263             
264             
265             # SearchEnginesWithKeysNotInQuery
266             # List of search engines that store keyword as page instead of query parameter
267             #------------------------------------------------------------------------------
268             %SearchEnginesWithKeysNotInQuery=(
269             'a9',1    # www.a9.com/searckey1%20searchkey2
270             );
271             
272             # SearchEnginesKnownUrl
273             # Known rules to extract keywords from a referrer search engine URL
274 rizwank 1.1 #------------------------------------------------------------------------------
275             %SearchEnginesKnownUrl=(
276             # Most common search engines
277             'alexa','q=',
278             'alltheweb','q(|uery)=',
279             'altavista','q=',
280             'a9','a9\.com\/', 
281             'dmoz','search=',
282             'google','(p|q)=',
283             'google_image','(p|q)=',
284             'lycos','query=',
285             'msn','q=',
286             'netscape','search=',
287             'aol','query=',
288             'terra','query=',
289             'voila','kw=',
290             'search.com','q=',
291             'yahoo','p=',
292             'sympatico', 'query=', 
293             'excite','search=',
294             # Minor internationnal search engines
295 rizwank 1.1 'go','qt=',
296             'ask','ask=',
297             'atomz','sp-q=',
298             'euroseek','query=',
299             'findarticles','key=',
300             'go2net','general=',
301             'hotbot','mt=',
302             'infospace','qkw=',
303             'kvasir', 'q=',
304             'looksmart','key=',
305             'mamma','query=',
306             'metacrawler','general=',
307             'nbci','keyword=',
308             'northernlight','qr=',
309             'overture','keywords=',
310             'dogpile', 'q(|kw)=',
311             'spray','string=',
312             'teoma','q=',
313             'virgilio','qs=',
314             'webcrawler','searchText=',
315             'wisenut','query=', 
316 rizwank 1.1 'ixquick', 'query=',
317             'earthlink', 'q=',
318             'iune','(keywords|q)=',
319             # Minor brazilian search engines
320             'engine','p1=', 'miner','q=',
321             # Minor chinese search engines
322             'baidu','word=', 'sina', 'word=', 'sohu','word=',
323             # Minor czech search engines
324             'atlas','searchtext=', 'seznam','w=', 'quick','query=', 'centrum','q=', 'jyxo','s=', 'najdi','dotaz=', 'redbox','srch=',
325             # Minor danish search engines
326             'opasia','q=', 'danielsen','q=', 'sol','q=', 'jubii','soegeord=', 'finddk','words=', 'edderkoppen','query=', 'orbis','search_field=', '1klik','query=', 'ofir','querytext=',
327             # Minor dutch search engines
328             'ilse','search_for=', 'vindex','in=',
329             # Minor english search engines
330             'askuk','ask=', 'bbc','q=', 'freeserve','q=', 'looksmart','key=',
331             'mirago','txtsearch=', 'splut','pattern=', 'spotjockey','Search_Keyword=', 'ukindex', 'stext=', 'ukdirectory','k=', 'ukplus','search=', 'searchy', 'search_term=',
332             # Minor finnish search engines
333             'haku','w=',
334             # Minor french search engines
335             'francite','name=', 'clubinternet', 'q=',
336             # Minor german search engines
337 rizwank 1.1 'aolde','q=',
338             'fireball','q=', 'infoseek','qt=', 'webde','su=',
339             'abacho','q=', 't-online','q=', 
340             'metaspinner','qry=',
341             'metacrawler_de','qry=',
342             # Minor hungarian search engines
343             'heureka','heureka=', 'origo','(q|search)=', 'goliat','KERESES=', 'wahoo','q=', 'internetto','searchstr=',
344             # Minor norvegian search engines
345             'start','q=',
346             # Minor polish search engines
347             'wp','szukaj=',
348             # Minor russian search engines
349             'yandex', 'text=', 'rambler','words=', 'aport', 'r=', 'metabot', 'st=',
350             # Minor swedish search engines
351             'passagen','q=',
352             # Minor swiss search engines
353             'searchch', 'q=', 'bluewin', 'qry='
354             );
355             
356             # SearchEnginesKnownUrlNotFound
357             # Known rules to extract not found keywords from a referrer search engine URL
358 rizwank 1.1 #------------------------------------------------------------------------------
359             %SearchEnginesKnownUrlNotFound=(
360             # Most common search engines
361             'msn','origq='
362             );
363             
364             # If no rules are known, WordsToExtractSearchUrl will be used to search keyword parameter
365             # If no rules are known and search in WordsToExtractSearchUrl failed, this will be used to clean URL of not keyword parameters.
366             #------------------------------------------------------------------------------
367             @WordsToExtractSearchUrl= ('ask=','claus=','general=','key=','kw=','keyword=','keywords=','MT=','p=','q=','qr=','qt=','query=','s=','search=','searchText=','string=','su=','txtsearch=','w=');
368             @WordsToCleanSearchUrl= ('act=','annuaire=','btng=','cat=','categoria=','cfg=','cof=','cou=','count=','cp=','dd=','domain=','dt=','dw=','enc=','exec=','geo=','hc=','height=','hits=','hl=','hq=','hs=','id=','kl=','lang=','loc=','lr=','matchmode=','medor=','message=','meta=','mode=','order=','page=','par=','pays=','pg=','pos=','prg=','qc=','refer=','sa=','safe=','sc=','sort=','src=','start=','style=','stype=','sum=','tag=','temp=','theme=','type=','url=','user=','width=','what=','\\.x=','\\.y=','y=','look=');
369             
370             # SearchEnginesKnownUTFCoding
371             # Known param that proves a search engines has coded its param in UTF8
372             #------------------------------------------------------------------------------
373             %SearchEnginesKnownUTFCoding=(
374             # Most common search engines
375             'google','ie=utf-8',
376             'alltheweb','cs=utf-8'
377             );
378             
379 rizwank 1.1 
380             # SearchEnginesHashLib
381             # List of search engines names
382             # 'search_engine_id', 'search_engine_name',
383             #------------------------------------------------------------------------------
384             %SearchEnginesHashLib=(
385             # Major internationnal search engines
386             'alexa','Alexa',
387             'alltheweb','AllTheWeb',
388             'altavista','AltaVista',
389             'a9', 'A9.com',
390             'dmoz','DMOZ',
391             'google','Google',
392             'google_image','Google (Images)',
393             'lycos','Lycos',
394             'msn','MSN',
395             'netscape','Netscape',
396             'aol','AOL',
397             'terra','Terra',
398             'tiscali','Tiscali',
399             'voila','Voila',
400 rizwank 1.1 'search.com','Search.com',
401             'yahoo','Yahoo',
402             'sympatico', 'Sympatico',
403             'excite','Excite',
404             # Minor internationnal search engines
405             'go','Go.com',
406             'ask','Ask Jeeves',
407             'atomz','Atomz',
408             'dejanews','DejaNews',
409             'euroseek','Euroseek',
410             'findarticles','Find Articles',
411             'go2net','Go2Net (Metamoteur)',
412             'hotbot','Hotbot',
413             'infospace','InfoSpace',
414             'kvasir','Kvasir',
415             'looksmart','Looksmart',
416             'mamma','Mamma',
417             'metacrawler','MetaCrawler (Metamoteur)',
418             'nbci','NBCI',
419             'northernlight','NorthernLight',
420             'overture','Overture',                 # Replace 'goto\.com','Goto.com',
421 rizwank 1.1 'dogpile','Dogpile',
422             'spray','Spray',
423             'teoma','Teoma',							# Replace 'directhit\.com','DirectHit',
424             'webcrawler','WebCrawler',
425             'wisenut','WISENut', 
426             'ixquick', 'ix quick', 
427             'earthlink', 'Earth Link',
428             'iune','i-une.com',
429             # Minor brazilian search engines
430             'engine','Cade', 'miner','Meta Miner',
431             # Minor chinese search engines
432             'baidu','Baidu', 'sina','Sina', 'sohu','Sohu',
433             # Minor czech search engines
434             'atlas','Atlas.cz',	'seznam','Seznam', 'quick','Quick.cz', 'centrum','Centrum.cz', 'jyxo','Jyxo.cz', 'najdi','Najdi.to', 'redbox','RedBox.cz',
435             # Minor danish search-engines
436             'opasia','Opasia', 'danielsen','Thor (danielsen.com)', 'sol','SOL', 'jubii','Jubii', 'finddk','Find', 'edderkoppen','Edderkoppen', 'netstjernen','Netstjernen', 'orbis','Orbis', 'tyfon','Tyfon', '1klik','1Klik', 'ofir','Ofir',
437             # Minor dutch search engines
438             'ilse','Ilse','vindex','Vindex\.nl',						
439             # Minor english search engines
440             'askuk','Ask Jeeves UK', 'bbc','BBC', 'freeserve','Freeserve', 'looksmartuk','Looksmart UK',
441             'mirago','Mirago', 'splut','Splut', 'spotjockey','Spotjockey', 'ukdirectory','UK Directory', 'ukindex','UKIndex', 'ukplus','UK Plus', 'searchy','searchy.co.uk',
442 rizwank 1.1 # Minor finnish search engines
443             'haku','Ihmemaa',										
444             # Minor french search engines
445             'aolfr','AOL (fr)', 'ctrouve','C\'est trouvé', 'francite','Francité', 'lbb', 'LBB', 'libertysurf', 'Libertysurf', 'free', 'Free.fr', 'clubinternet', 'Club-internet',
446             # Minor german search engines
447             'aolde','AOL (de)',
448             'fireball','Fireball', 'infoseek','Infoseek', 'webde','Web.de',
449             'abacho','Abacho', 't-online','T-Online', 
450             'allesklar','allesklar.de', 'meinestadt','meinestadt.de', 
451             'metaspinner','metaspinner',
452             'metacrawler_de','metacrawler.de',
453             # Minor hungarian search engines
454             'heureka','Heureka', 'origo','Origo-Vizsla', 'lapkereso','Startlapkereső', 'goliat','Góliát', 'indexhu','Index', 'wahoo','Wahoo', 'webmania','webmania.hu', 'internetto','Internetto Kereső',
455             # Minor italian search engines
456             'virgilio','Virgilio',										
457             # Minor norvegian search engines
458             'start','start.no',								
459             # Minor polish search engines
460             'wp','Szukaj',
461             # Minor russian search engines
462             'yandex', 'Yandex', 'aport', 'Aport', 'rambler', 'Rambler', 'turtle', 'Turtle', 'metabot', 'MetaBot',
463 rizwank 1.1 # Minor swedish search engines
464             'passagen','Evreka',
465             # Minor Swiss search engines
466             'searchch', 'search.ch', 'bluewin', 'search.bluewin.ch',								
467             # Generic search engines
468             'search','Unknown search engines'
469             );
470             
471             
472             # Sanity check.
473             # Enable this code and run perl search_engines.pm to check file entries are ok
474             #-----------------------------------------------------------------------------
475             #foreach my $key (@SearchEnginesSearchIDOrder_list1) {
476             #	if (! $SearchEnginesHashID{$key}) { error("Entry '$key' has been found in SearchEnginesSearchIDOrder_list1 with no value in SearchEnginesHashID");
477             #	foreach my $key2 (@SearchEnginesSearchIDOrder_list2) { if ($key2 eq $key) { error("$key is in 1 and 2\n"); } }
478             #	foreach my $key2 (@SearchEnginesSearchIDOrder_listgen) { if ($key2 eq $key) { error("$key is in 1 and gen\n"); } }
479             #} }
480             #foreach my $key (@SearchEnginesSearchIDOrder_list2) {
481             #	if (! $SearchEnginesHashID{$key}) { error("Entry '$key' has been found in SearchEnginesSearchIDOrder_list1 with no value in SearchEnginesHashID");
482             #	foreach my $key2 (@SearchEnginesSearchIDOrder_list1) { if ($key2 eq $key) { error("$key is in 2 and 1\n"); } }
483             #	foreach my $key2 (@SearchEnginesSearchIDOrder_listgen) { if ($key2 eq $key) { error("$key is in 2 and gen\n"); } }
484 rizwank 1.1 #} }
485             #foreach my $key (@SearchEnginesSearchIDOrder_listgen) { if (! $SearchEnginesHashID{$key}) { error("Entry '$key' has been found in SearchEnginesSearchIDOrder_listgen with no value in SearchEnginesHashID"); } }
486             #foreach my $key (keys %NotSearchEnginesKeys) { if (! $SearchEnginesHashID{$key}) { error("Entry '$key' has been found in NotSearchEnginesKeys with no value in SearchEnginesHashID"); } }
487             #foreach my $key (keys %SearchEnginesKnownUrl) {
488             #	my $found=0;
489             #	foreach my $key2 (values %SearchEnginesHashID) {
490             #		if ($key eq $key2) { $found=1; last; }
491             #	}
492             #	if (! $found) { die "Entry '$key' has been found in SearchEnginesKnownUrl with no value in SearchEnginesHashID"; }
493             #}
494             #foreach my $key (keys %SearchEnginesHashLib) {
495             #	my $found=0;
496             #	foreach my $key2 (values %SearchEnginesHashID) {
497             #		if ($key eq $key2) { $found=1; last; }
498             #	}
499             #	if (! $found) { die "Entry '$key' has been found in SearchEnginesHashLib with no value in SearchEnginesHashID"; }
500             #}
501             #print @SearchEnginesSearchIDOrder_list1." ".@SearchEnginesSearchIDOrder_list2." ".@SearchEnginesSearchIDOrder_listgen;
502             
503             1;

Rizwan Kassim
Powered by
ViewCVS 0.9.2