|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Pavel V. Ammosov 2:5020/52 18 Apr 2001 02:04:32 To : Gennady Archibasov Subject : Re: mod_perl -------------------------------------------------------------------------------- >Привет. >Есть вот пара вопросиков по мод_перлу > 1. > my @date=localtime(time); > $date[4]=$q->param('m') if ($q->param('m') ne ''); >есть такие строчки в скрипте, так вот на второй в error_log пишется >Use of uninitialized value at....... >ну и за часик написАлось под 200 Мб :) Hехилый траффик, однако. Я, правда, не понимаю, почему там пишется об неинициализированной переменной, но зато знаю способ победить симптом: ;) $^W = 0; my @date=localtime(time); $date[4]=$q->param('m') if ($q->param('m') ne ''); $^W = 1; > 2. Основной конфиг подключается к скрипту как > use News::Config qw(...переменные...) > а в одной хтмэльке скрипт подключается так > <!--#include virtual="/perl/script.cgi?cfg=1.cfg"--> >т.е. передается конфиг, который изменяет некоторые переменные главного конфа > require $q->param('cfg') if ($q->param('cfg')); >Все б хорошо, но ИHОГДА при вызове скрипта без параметра, он выводится с >конфигом 1.cfg >что делать ? guide читал? Если это то что я думаю, то про него вот здесь написано http://theoryx5.uwinnipeg.ca/guide/porting/Sometimes_it_Works_Sometimes_it.html Generally the problem is the result of using global variables. Because global variables don't change from one script invocation to another unless you change them, you can find your scripts do strange things. -- Pavel Ammosov O \ apavel@aha.ru __ ) http://isabase.philol.msu.ru/~apavel/ ) wget -O - isabase.philol.msu.ru/~apavel/key.asc|pgp -fka O / --- slrn/0.9.6.3 (Linux) * Origin: Zenon N.S.P. news server (2:5020/52.0) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/829385d09588c.html, оценка из 5, голосов 10
|