soutade/iwla
1
0
Fork 0
Code Issues Pull Requests Releases 2 Activity

Add own search engines file

Browse Source
This commit is contained in:
Gregory Soutade
2015-06-12 17:56:27 +02:00
parent 79b58f2e1c
commit 4e71380293
3 changed files with 46 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
tools/iwla_convert.pl
View File

@@ -7,6 +7,7 @@ my @awstats_libs = ('search_engines.pm', 'robots.pm', 'operating_systems.pm', 'b
# my @awstats_libs = ('browsers.pm', 'browsers_phone.pm', 'mime.pm', 'referer_spam.pm', 'search_engines.pm', 'operating_systems.pm', 'robots.pm', 'worms.pm');
foreach $lib (@awstats_libs) {require $awstats_lib_root . $lib;}
require './tools/own_search_engines.pm';
sub dumpList {
my @list = @{$_[0]};
@@ -64,6 +65,7 @@ print $FIC "]\n\n";
print $FIC "search_engines_2 = [";
dumpList(\@SearchEnginesSearchIDOrder_list2, $FIC, 1);
dumpList(\@Own_SearchEnginesSearchIDOrder, $FIC, 0);
print $FIC "]\n\n";
print $FIC "not_search_engines_keys = {";
@@ -72,10 +74,12 @@ print $FIC "}\n\n";
print $FIC "search_engines_hashid = {";
dumpHash(\%SearchEnginesHashID, $FIC, 1);
dumpHash(\%Own_SearchEnginesHashID, $FIC, 0);
print $FIC "}\n\n";
print $FIC "search_engines_knwown_url = {";
dumpHash(\%SearchEnginesKnownUrl, $FIC, 1);
dumpHash(\%Own_SearchEnginesKnownUrl, $FIC, 0);
print $FIC "}\n\n";
print $FIC "operating_systems = [";