modif de printemps
This commit is contained in:
parent
95af6c6e33
commit
71a1c76806
|
@ -1,5 +1,4 @@
|
||||||
2000/05/0024 16:01:27|bad referrer, off-site access denied||132.227.103.10
|
2000/06/07 17:07:36|log file access|/index.html|132.227.103.10
|
||||||
2000/05/0024 16:23:36|illegal method||
|
2000/06/07 17:09:00|log file access|/alliance/index.html|132.227.103.10
|
||||||
2000/05/0025 12:42:00|bad query_string||
|
2000/06/07 17:09:41|log file access|/mailing-lists/alliance-support/1999/0037.html|216.35.116.46
|
||||||
2000/05/0025 12:55:38|illegal method||
|
2000/06/07 17:09:45|log file access|/alliance/mailing-lists/alliance-support/1999/0058.html|198.142.189.168
|
||||||
2000/05/28 13:51:14|bad referrer, off-site access denied||208.185.131.219
|
|
||||||
|
|
|
@ -1 +1 @@
|
||||||
20659
|
21785
|
File diff suppressed because it is too large
Load Diff
|
@ -71,6 +71,7 @@ $sitename = $query->param('site');
|
||||||
if ( $sitename eq "" )
|
if ( $sitename eq "" )
|
||||||
{$sitename="asim";}
|
{$sitename="asim";}
|
||||||
|
|
||||||
|
$pn="l";
|
||||||
$log_path = $log_path . "$sitename/";
|
$log_path = $log_path . "$sitename/";
|
||||||
$img_url = $img_url . "$sitename/";
|
$img_url = $img_url . "$sitename/";
|
||||||
|
|
||||||
|
@ -184,8 +185,9 @@ exit;
|
||||||
sub err_log {require "$log_path"."a_errlog.pl"; &err_logs}
|
sub err_log {require "$log_path"."a_errlog.pl"; &err_logs}
|
||||||
|
|
||||||
########## Main
|
########## Main
|
||||||
|
|
||||||
if ( $ENV{'DOCUMENT_URI'} ) { &do_ssi; }
|
if ( $ENV{'DOCUMENT_URI'} ) { &do_ssi; }
|
||||||
|
if (0) {
|
||||||
|
|
||||||
if ( $ENV{'REQUEST_METHOD'} eq 'GET' ) {;}
|
if ( $ENV{'REQUEST_METHOD'} eq 'GET' ) {;}
|
||||||
elsif ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {;}
|
elsif ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {;}
|
||||||
else {$err = "illegal method"; &err_log;}
|
else {$err = "illegal method"; &err_log;}
|
||||||
|
@ -222,4 +224,5 @@ sub err_log {require "$log_path"."a_errlog.pl"; &err_logs}
|
||||||
local($digit) = substr($cnb,$pn,1);
|
local($digit) = substr($cnb,$pn,1);
|
||||||
&sendFile($img_url.$digit.".gif", "image/gif");
|
&sendFile($img_url.$digit.".gif", "image/gif");
|
||||||
}
|
}
|
||||||
|
}
|
||||||
exit(0);
|
exit(0);
|
||||||
|
|
Loading…
Reference in New Issue