罪罰改造板２/464

local($date,$nm,$camp,$com,$sogo_txt,$addr,$host,$agent,$icon,$type_from) = split(/<>/);

 unshift (@lines,"$date<>$DAT{'nm'}<>$DAT{'camp'}<>$com<>$DAT{'sogo_txt'}<>$addr<>$host<>$agent<>$DAT{'icon'}<>$DAT{'type_from'}<>\n");