|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Artem Chuprina 2:5020/371.32 14 Feb 2001 12:19:08 To : Loginov Nick Subject : Re: guestbook -------------------------------------------------------------------------------- В твоём письме от Sun, 14 Jan 2001 14:13:24 +0300 написано: DG>> Hе подскажет ли всезнающий ALL как лучше всего в гостевой книге удалять DG>> опpеделенные записи. Пока мне видится следующий способ: в начале и конце DG>> каждого сообщения ставить комментаpии с номеpом этого сообщения и потом DG>> если нужно то искать их и выpезать, но здесь возникает дpугой вопpос как DG>> нумеpовать сообщения ? Может есть дpугой какой способ ? LN> А зачем их нумеровать, если у тебя они и так по строчно пронумерованы? LN> Допустим скрипт получает какой-либо номер, каторый надо удалить - $del LN> open (GB,$gbbase); @base=<GB>>; LN> close(GB); LN> $size=scalar(@base); #номер последней строки в файле. LN> open (GB,">$gbbase"); # отчищаем файл LN> close(GB); LN> while ($size > $i) LN> { LN> if ($i == $del) {$i++} else LN> { LN> open (GB,">>$gbbase"); LN> print GB "base[$i]"; LN> close(GB) LN> } LN> } LN> Можно наверно и по другому сделать. Hо так набросал что первое в голову LN> пришло. Работать должно 100 пудово! До первых двух одновременных запросов. Затем накроет гестбук целиком. Или наполовину. Как получится. -- Artem Chuprina E-mail: ran@ran.pp.ru Programmer FIDO: 2:5020/371.32 Memonet Ltd. Phone: +7-095-284-1356 --- slrn/0.9.6.3-as (Linux) * Origin: AKA с подствольным плюсомётом (2:5020/371.32) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/73314b4655362.html, оценка из 5, голосов 10
|