|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Alexander Ilyankin 2:5059/9.81 09 May 2003 18:20:10 To : Nikolay Archakov Subject : Re: Счетчик -------------------------------------------------------------------------------- NA> Люди, подскажите пожалyйста чайникy, как оpганизовать счетчик? Делается это таким образом: Допустим тебе нужно сощетать сколько раз загружалась инет-страница... Создаём файл count.txt с цифрой "0" . В скрипте открываем файл count.txt, смотрим что за цифра там написана и передаём это число какой-нибудь переменной, например $count. open (TXTFILE, "count.txt"); $count = <TXTFILE>; close(TXTFILE); Далее мы увеличиваем число написанное в файле count.txt на 1. $count++; Когда увеличили число нужно его сохранить в этот же файл т.е. перезаписать это число. open (TXTFILE, ">count.txt"); print TXTFILE "$count"; close(TXTFILE); Hу и любой счетчик должен чтото показывать, делаем это так: print "$count"; Вот такие дела, Nikolay :) Удачи! --- GoldED+/386 1.1.4.5 * Origin: Тра ля ля (2:5059/9.81) Вернуться к списку тем, сортированных по:
Архивное /ru.cgi.perl/28483ebc034f.html, оценка из 5, голосов 10
|