罪罰改造板２/285

http://＊＊＊＊＊＊/imgss/Mozilla/4.0%20(compatible;%20MSIE%206.0;%20Windows%20NT%205.1;%20SV1;%20.NET%20CLR%201.0.3705;%20.NET%20CLR%201.1.4322).gif

# 展開
local($date,$nm,$camp,$com,$sogo,$addr,$host) = split(/<>/);
# 書き込み
unshift (@lines,"$date<>$DAT{'nm'}<>$DAT{'camp'}<>$com<>$DAT{'sogo'}<>$addr<>$host<>$agent<>\n");