チャットに投稿する人のホスト情報を、発言ごとに裏ソースにこっそり表示するには？

うらうら [E-Mail] 1999/12/19(日) 10:32:56
foreach (@lines) {
($date,$name,$email,$comment,$color) = split(/<>/, $_);
print "<hr size=1>\n";
print "$name ＞ $comment \n";
print "($date) \n";
}

多分、上の個所をいじればよいのだとは思うのですが・・・

foreach (@lines) {
($date,$name,$email,$comment,$color,$host) = split(/<>/, $_);
print "<hr size=1>\n";
print "$name ＞ $comment \n";
print "($date)<!$host> \n";
}

では、うまく機能しませんでした。
自分自身のホスト情報が、ナゼか
全部の発言に貼り付けられてしまったり・・・

どうすれば、ログのホストを
それぞれの発言に対応させ呼び出せるでしょうか？

12/19-6:32:6<>MASTER<><>名前コメント<>文字色<>ホスト情報<>

という順番でログファイルに記入されています。

ラウォッチ 1999/12/19(日) 11:21:17
<>ホスト情報<> の所に、$ENV{'REMOTE_HOST'}でなくSERVER_NAMEからもってきているとか。

あと、<!$host>をにしてみるとか。

うらうら 1999/12/19(日) 18:00:52
>あと、<!$host>をにしてみるとか。

これが、ドンピシャでした。
見事ホスト情報を表示できるようになりました。
どうもありがとうございました。

ただ、最後に一つだけ、
初心者の私にはどうしても分からないのですが・・・
<!$host>とはどう違うのかが、分かりません(^^;)。
どうして、<!$host>だと駄目なのに、だとOKなのか、
教えていただけませんでしょうか？

「--」に大きな意味があるんですねぇ・・・
なんでもなさそうに見えるのに、プログラムって奥が深い・・・

ラウォッチ 1999/12/20(月) 09:28:49
わたしもよくわかりませんが、

!$hostで$hostを論理否定してしまう？

あと、<!$host>はHTMLで文法エラーです。
ならＯＫ！