昨日のようなフォーマットにログファイルを変更したので、読み込み部分を変えてみます。 こんな感じ。 sub FILEIN_MSG{ if( open( LOGFILE, "<./msg.txt" ) ){ flock( LOGFILE, 1 ); ($Char_Count, $Vil_Img, $Vil_Css) = split( /<>/, <LOGFILE>); for($index = 0 ; </logfile>…