/home/ftplightl/access_log /home/ftplightl/error_log {
    monthly
    rotate 24
    sharedscripts
    postrotate
        /bin/kill -HUP `cat /usr/local/apache2/logs/httpd.pid 2>/dev/null` 2> /dev/null || true
    endscript
}

      ■ PC1
         192.168.111.123
          |
   [インターネット]
          |
        eth0: 192.168.222.234   
     ■ SV1
        eth1: 192.168.0.234
          |
      [  LAN  ]
          |
        192.168.0.100 
     ■ LSV1

      ■ PC1
         192.168.111.123
          |
   [インターネット]
          |          
        ppp0: 192.168.222.234  /  eth0:
     ■ SV1
        eth1: 192.168.0.234
          |
      [  LAN  ]
          |
        192.168.0.100 
     ■ LSV1

### 携帯用データ作成
sub get_mobile_data {
	my($data) = @_;

	$data =~ s/¥xEF¥xBD¥x9E/¥xE3¥x80¥x9C/g;
	$data = Jcode->new($data, 'utf8')->sjis;

	$data =~ s/¥r¥n/¥r/g;
	$data =~ s/¥n/¥r/;

#	return($data, length($data) + ($data =~ s/¥n/¥n/g));
	return($data, length($data));
}

$http_count_limit = 5;   # 今回追加
$http_count = 0; # 今回追加
#デコード
@pairs = split(/&/,$buffer);
foreach $pair (@pairs) {

	($name,$value) = split(/=/,$pair);
	$value =~ tr/+/ /;
	$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;
	$name =~ tr/+/ /;
	$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C",hex($1))/eg;

	$http_count += $value =~ s/http/http/g; # 今回追加

	&jcode'convert(*name,'sjis'); &jcode'convert(*value,'sjis');

----- 中略 -----

}

#入力チェック
# 以下の5行、今回追加
# push(@DATA_NS,'http_count'); push(@DATA_VS,$http_count);
if ($http_count_limit<$http_count) {
 &error('送信不可','内容が迷惑書込みと判断されました。FAXまたは電話でお問合せ下さい。');
}