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