*** /home/warrenc5/tmp/awstats-6.5/wwwroot/cgi-bin/awstats.pl	Fri Mar  4 13:38:04 2005
--- awstats.pl	Sun Apr 17 15:53:02 2005
***************
*** 320,326 ****
  %_worm_h %_worm_k %_worm_l %_login_h %_login_p %_login_k %_login_l %_screensize_h
  %_misc_p %_misc_h %_misc_k
  %_cluster_p %_cluster_h %_cluster_k
! %_se_referrals_p %_se_referrals_h %_sider404_h %_referer404_h %_url_p %_url_k %_url_e %_url_x
  %_unknownreferer_l %_unknownrefererbrowser_l
  %_emails_h %_emails_k %_emails_l %_emailr_h %_emailr_k %_emailr_l
  /;
--- 320,326 ----
  %_worm_h %_worm_k %_worm_l %_login_h %_login_p %_login_k %_login_l %_screensize_h
  %_misc_p %_misc_h %_misc_k
  %_cluster_p %_cluster_h %_cluster_k
! %_se_referrals_p %_se_referrals_h %_sider404_h %_referer404_h %_lastaccess404_h %_url_p %_url_k %_url_e %_url_x
  %_unknownreferer_l %_unknownrefererbrowser_l
  %_emails_h %_emails_k %_emails_l %_emailr_h %_emailr_k %_emailr_l
  /;
***************
*** 3188,3194 ****
                                                                  $countloaded++;
                                                                  if ($field[1]) { $_sider404_h{$field[0]}+=$field[1]; }
                                                                  if ($withupdate || $HTMLOutput{"errors$code"}) {
!                                                                         if ($field[2]) { $_referer404_h{$field[0]}=$field[2]; }
                                                                  }
                                                          }
                                                  }
--- 3188,3194 ----
                                                                  $countloaded++;
                                                                  if ($field[1]) { $_sider404_h{$field[0]}+=$field[1]; }
                                                                  if ($withupdate || $HTMLOutput{"errors$code"}) {
!                                                                         if ($field[2]) { $_referer404_h{$field[0]}=$field[2]; $_lastaccess404_h{$field[$pos_date]}=$field[3]; }
                                                                  }
                                                          }
                                                  }
***************
*** 3202,3208 ****
                                          delete $SectionsToLoad{"sider_$code"};
                                          if ($SectionsToSave{"sider_$code"}) {
                                                  Save_History("sider_$code",$year,$month); delete $SectionsToSave{"sider_$code"};
!                                                 if ($withpurge) { %_sider404_h=(); %_referer404_h=(); }
                                          }
                                          if (! scalar %SectionsToLoad) { debug(" Stop reading history file. Got all we need."); last; }
                                          next;
--- 3202,3208 ----
                                          delete $SectionsToLoad{"sider_$code"};
                                          if ($SectionsToSave{"sider_$code"}) {
                                                  Save_History("sider_$code",$year,$month); delete $SectionsToSave{"sider_$code"};
!                                                 if ($withpurge) { %_sider404_h=(); %_referer404_h=(); %_lastaccess404_h=(); }
                                          }
                                          if (! scalar %SectionsToLoad) { debug(" Stop reading history file. Got all we need."); last; }
                                          next;
***************
*** 3936,3942 ****
                          foreach (keys %_sider404_h) {
                                  my $newkey=$_;
                                  my $newreferer=$_referer404_h{$_}||'';
!                                 print HISTORYTMP "${xmlrb}".XMLEncodeForHisto($newkey)."${xmlrs}$_sider404_h{$_}${xmlrs}".XMLEncodeForHisto($newreferer)."${xmlre}\n";
                          }
                          print HISTORYTMP "${xmleb}END_SIDER_$code${xmlee}\n";
                  }
--- 3936,3943 ----
                          foreach (keys %_sider404_h) {
                                  my $newkey=$_;
                                  my $newreferer=$_referer404_h{$_}||'';
!                                 my $newlastaccess=$_lastaccess404_h{$_}||'';
!                                 print HISTORYTMP "${xmlrb}".XMLEncodeForHisto($newkey)."${xmlrs}$_sider404_h{$_}${xmlrs}".XMLEncodeForHisto($newreferer).${xmlrs}.XMLEncodeForHisto($newlastaccess)."${xmlre}\n";
                          }
                          print HISTORYTMP "${xmleb}END_SIDER_$code${xmlee}\n";
                  }
***************
*** 4192,4198 ****
          %_worm_h = %_worm_k = %_worm_l = %_login_p = %_login_h = %_login_k = %_login_l = %_screensize_h = ();
          %_misc_p = %_misc_h = %_misc_k = ();
          %_cluster_p = %_cluster_h = %_cluster_k = ();
!         %_se_referrals_p = %_se_referrals_h = %_sider404_h = %_referer404_h = %_url_p = %_url_k = %_url_e = %_url_x = ();
          %_unknownreferer_l = %_unknownrefererbrowser_l = ();
          %_emails_h = %_emails_k = %_emails_l = %_emailr_h = %_emailr_k = %_emailr_l = ();
          for (my $ix=1; $ix < @ExtraName; $ix++) {
--- 4193,4199 ----
          %_worm_h = %_worm_k = %_worm_l = %_login_p = %_login_h = %_login_k = %_login_l = %_screensize_h = ();
          %_misc_p = %_misc_h = %_misc_k = ();
          %_cluster_p = %_cluster_h = %_cluster_k = ();
!         %_se_referrals_p = %_se_referrals_h = %_sider404_h = %_referer404_h = %_lastaccess404_h = %_url_p = %_url_k = %_url_e = %_url_x = ();
          %_unknownreferer_l = %_unknownrefererbrowser_l = ();
          %_emails_h = %_emails_k = %_emails_l = %_emailr_h = %_emailr_k = %_emailr_l = ();
          for (my $ix=1; $ix < @ExtraName; $ix++) {
***************
*** 6396,6401 ****
--- 6397,6403 ----
                                                  my $newreferer=$field[$pos_referer];
                                                  if (! $URLReferrerWithQuery) { $newreferer =~ s/[$URLQuerySeparators].*$//; }
                                                  $_referer404_h{$newurl}=$newreferer;
+                                                 $_lastaccess404_h{$newurl}=$field[$pos_date];
                                                  last;
                                          }
                                          }
***************
*** 8444,8450 ****
                  if ($HTMLOutput{"errors$code"}) {
                          print "$Center<a name=\"errors$code\">&nbsp;</a><br />\n";
                          &tab_head($Message[47],19,0,"errors$code");
!                         print "<tr bgcolor=\"#$color_TableBGRowTitle\"><th>URL (".(scalar keys %_sider404_h).")</th><th bgcolor=\"#$color_h\">$Message[49]</th><th>$Message[23]</th></tr>\n";
                          $total_h=0;
                          my $count=0;
                          &BuildKeyList($MaxRowsInHTMLOutput,1,\%_sider404_h,\%_sider404_h);
--- 8446,8452 ----
                  if ($HTMLOutput{"errors$code"}) {
                          print "$Center<a name=\"errors$code\">&nbsp;</a><br />\n";
                          &tab_head($Message[47],19,0,"errors$code");
!                         print "<tr bgcolor=\"#$color_TableBGRowTitle\"><th>URL (".(scalar keys %_sider404_h).")</th><th bgcolor=\"#$color_h\">$Message[49]</th><th>$Message[23]</th><th>Last Accessed</th></tr>\n";
                          $total_h=0;
                          my $count=0;
                          &BuildKeyList($MaxRowsInHTMLOutput,1,\%_sider404_h,\%_sider404_h);
***************
*** 8452,8460 ****
--- 8454,8464 ----
                      my $nompage=XMLEncode(CleanFromCSSA($key));
                                  #if (length($nompage)>$MaxLengthOfShownURL) { $nompage=substr($nompage,0,$MaxLengthOfShownURL)."..."; }
                                  my $referer=XMLEncode(CleanFromCSSA($_referer404_h{$key}));
+                                 my $lastaccess2=XMLEncode(CleanFromCSSA($_lastaccess404_h{$key}));
                                  print "<tr><td class=\"aws\">$nompage</td>";
                                  print "<td>$_sider404_h{$key}</td>";
                                  print "<td class=\"aws\">".($referer?"$referer":"&nbsp;")."</td>";
+                                 print "<td class=\"aws\">".($lastaccess2?"$lastaccess2":"&nbsp;")."</td>";
                                  print "</tr>\n";
                                  $total_s += $_sider404_h{$key};
                                  $count++;