Shurik
Главком. флейма | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
был вариант - скачать, переименовать всё и обратно. А если тем сотни? Дурацкий вариант...
если знать чуть-чуть перл, то и делать нечего оказывается.
Я щас не дома, так что по памяти - не обессудьте. 
Короче... после небольшой попытки по памяти написать скрипт я отказался от этой идеи... поэтому дам только алгоритм - пусть те, кто хоть как-то шарит в перле накатают вам скрипт (мне надо дома оказаться).
Код:
# если надо во всех форумах закрыть вдруг, то открываем allforums.cgi...
# потом foreach $forumline (@allforums) {#тело ниже}
# не помню, но как-то там через grep получаем в массив все имена файлов с расширением pl
# @files - допустим, как раз такой массив
foreach $line (@files) {
($var, $var2, $var3...) = split(/\|/, $line);
# тут меняем нужный $var (не помню я где находится в .pl статус темы (open, closed)
# перезаписываем этот pl (файл - $line): open(), print F "$var1|$var2|$var3|..."; close();
}
|
вообщем примерно так!
а вообще я давно уже привык все свои потребности через такие маленькие скриптики делать. Примеров много: надо было из всех mal удалить чей-то емайл - че, тоже выкачивать ВСЕ эти файлы, адиторов править сотни файлов и обратно? 
Или подправил всем в профиле счетчик постов, ибо известно, что движок настолько корявый, что у меня за неделю-две улетает число постов немеренно просто.
|
