#!/usr/bin/perl #参加履歴照会 # 98/11/24 update(v4.1) by 普通 #==================================================================== #ご協力を頂いた方 #oidon #==================================================================== require './chat_env.cgi'; require './chat_lib.pl'; &env_init; ################変更点######################## # Ｃｈａｔ室（部屋選択）へ戻る。の前にある$titleを削除しました########### ########################################################################################### print<<"__EOF__"; Content-type: text/html $title2 $hp_bcolor

$title - Ｃｈａｔ室への参加状況

Ｃｈａｔ室（部屋選択）へ戻る。
各Ｃｈａｔ室への参加以下の通りです。
__EOF__ &ReadLog(); foreach (@lf_list) {print;} print<<"__EOF__";
__EOF__