From: eldy <> Date: Thu, 1 Feb 2001 23:37:55 +0000 (+0000) Subject: Add option to report keywords used from search engine as separate words or as full... X-Git-Tag: AWSTATS_1_0~338 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7c50047d3280e4d5f01b5eb293fa5f9c5a62e6d8;p=thirdparty%2FAWStats.git Add option to report keywords used from search engine as separate words or as full search string. --- diff --git a/awstats.pl b/awstats.pl index 9fb19df0..a616d0d9 100644 --- a/awstats.pl +++ b/awstats.pl @@ -14,7 +14,7 @@ #------------------------------------------------------- # Defines #------------------------------------------------------- -$VERSION="2.24 (build 11)"; +$VERSION="2.24 (build 12)"; $Lang=0; # Default value @@ -572,7 +572,7 @@ $message[70][5]="Nov"; $message[71][5]="Dez"; # Polish -$PageCode[6]=""; +$PageCode[6]=""; $message[0][6]="Nieznany"; $message[1][6]="Nieznany (brak odwzorowania IP w DNS)"; $message[2][6]="Inni go¶cie"; @@ -647,7 +647,7 @@ $message[70][6]="Listopad"; $message[71][6]="Grudzieñ"; # Greek (simos@hellug.gr) -$PageCode[7]=""; +$PageCode[7]=""; $message[0][7]="¶ãíùóôï"; $message[1][7]="¶ãíùóôï (ìç áíáãíùñéóìÝíç ip)"; $message[2][7]="¶ëëïé åðéóêÝðôåò"; @@ -2096,6 +2096,7 @@ if (($YearRequired == $nowyear) && ($MonthRequired eq "year" || $MonthRequired = } } else { + $param =~ s/^ *//; $param =~ s/ *$//; $param =~ s/ */ /g; if ((length $param) > 0) { $param =~ s/ /+/g; $_keywords{$param}++; } } last; @@ -2118,6 +2119,7 @@ if (($YearRequired == $nowyear) && ($MonthRequired eq "year" || $MonthRequired = } } else { + $param =~ s/^ *//; $param =~ s/ *$//; $param =~ s/ */ /g; if ((length $param) > 2) { $param =~ s/ /+/g; $_keywords{$param}++; } } } @@ -3084,7 +3086,7 @@ if ($TotalHits > 0) { $_=int($_from_h[2]/$TotalHits*1000)/10; } print "$message[40][$Lang] :
\n"; print "\n"; foreach $SE (@sortsereferrals) { - print "\n"; + print "\n"; } print "
- $SearchEnginesHash{$SE} $_se_referrals_h{\"$SE\"}
- $SearchEnginesHash{$SE} $_se_referrals_h{\"$SE\"}
\n"; print "$_from_h[2] $_ %\n\n"; @@ -3128,8 +3130,8 @@ $count=0; foreach $key (@sortsearchwords) { if ( $count>=$MaxNbOfKeywordsShown ) { last; } $p=int($_keywords{$key}/$TotalKeywords*1000)/10; - print "$key$_keywords{$key}"; - print "$p %\n"; + $mot = $key; $mot =~ s/\+/ /g; # Showing $key without + + print "$mot$_keywords{$key}$p %\n"; $count++; } $count=0;$rest=0;