| りゅういち様
お忙しい中、ご教授ありがとうございます。
> 199行目の > ($nam,$date,...,$ico,$type) = split(/<>/,$Line); > を > ($nam,$date,...,$ico,$type,$delkey,$ip,$sendmail) = split(/<>/,$Line); > としてみてください。
できました。
> $ip = $ENV{'REMOTE_ADDR'}; > $host= gethostbyaddr(pack("C4", split(/\./, $ip)), 2); > $ip .= "\/$host"; > とすれば / 区切りでIPアドレスとホストアドレスが記録されます。
できました。
ご親切にご対応していただいたおかげで助かりました。 貴サイトの益々のご繁栄をお祈りいたします
今後とも宜しくお願い致します。
|