Rikimaru
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Gram, Тоесть это где-то тут, в этом куске? Цитата: $processed_data .= "$inmembername|$topictitle|Moderation Mode|yes|yes|$currenttime|$inpost"; $filetomake = "$ikondir" . "forum$inforum/$intopic.thd"; open(FILE, ">$filetomake"); flock(FILE, 2); print FILE $processed_data; close(FILE); undef $processed_data; $threadposts = @allmessages; my $file = "$ikondir" . "forum$inforum/$intopic.pl"; open (ENT, $file); flock ENT, 1; $in = <ENT>; close (ENT); ($topicid, $topictitle, $topicdescription, $threadstate, $threadposts ,$threadviews, $startedby, $startedpostdate, $lastposter, $lastpostdate) = split(/\|/,$in); open(FILE, ">$file"); flock(FILE, 2); $threadposts++; print FILE "$intopic|$topictitle|$topicdescription|closed|$threadposts|$threadviews|$startedby|$startedpostdate|$inmembername|$currenttime"; close(FILE); } # end if inleavemessage eq yes | Сейчас буду экспериментировать. Чёрт... там много чего относящегося к теме... | Всего записей: 15 | Зарегистр. 15-04-2005 | Отправлено: 20:28 21-04-2005 | Исправлено: Rikimaru, 20:55 21-04-2005 |
|