fastcgi -> GetOverlappedResult()

[AnnA]

NeoNox:
Попробуй 1.3 поставить и посмотри как на нем всеработает.

не. я пока не буду откатываться. хорошо?
просто вычитала в умной книжке, что Apache2 намного более совместим с windows

[NeoNox]

AnnA:
м?

не м! Все туда, иначе будешь работать в ЦГИ режиме.
В доке-же все описано.

[AnnA]

NeoNox:
не м! Все туда, иначе будешь работать в ЦГИ режиме.

ну блин... хорошо.
а почему же он тогда без этого не работает? другие же работают. а с формой что, принципиально ничего не получится? жаль - уже нет сегодня времени всё проверить.
:rolleyes:
NeoNox спасибо Вам большое за массу потраченного на меня времени.

[NeoNox]

AnnA:
а почему же он тогда без этого не работает?

Не знаю, нужно смотреть твой скрипт.

[AnnA]

как передать параметры, а?

Код: [Выделить]


use strict;
use CGI;
use CGI::Carp qw(fatalsToBrowser);
use CGI::Fast;

our ($cgi, $login, $pass);
$cgi = new CGI;
$login = $cgi->param(\'user\') if $cgi->param(\'user\');
$pass = $cgi->param(\'passw\') if $cgi->param(\'passw\');

    while (new CGI::Fast) {
&head();
if (!$login or !$pass) {
print $cgi->h4({-style=>\'color:red;text-align:center\'},\'empty login or password\');
    } else {
print $login,\'
\',$pass,\'
connect to db....\';
}
    } #while (new CGI::Fast)

sub head () {
print $cgi->header(-charset=>\'windows-1251\', pragma=>\'no-cache\'),
\'\';
    }

всегда печатает: empty login or password

[NeoNox]

perldoc CGI::Fast в разделе
WRITING FASTCGI PERL SCRIPTS

[AnnA]

NeoNox ага. Не работала у меня такая конструкция (вот убила некоторое кол-во времени на проверку практикой) потому, что я писала как оо. т.е. конструкция вида
use CGI;
use CGI::Fast;
..........
$cgi = new CGI;
почему-то не видит в теле while (new CGI::Fast)
$login = $cgi->param(\'user\');
причем именно парам. остальные методы вызываются (например тот же print $cgi->header()), но достучаться до параметров из формы мне так и не удалось.
зато конструкция:
use CGI::Fast qw(:standard);
замечательно выдает $login = param(\'user\');
в общем-то - это не очень хорошо, на мой взгляд. ну, что необходимо отказаться от использования оо кода. ну да ладно. "слишком хорошо - тоже нехорошо". наверное.
вот теперь пришло время второго вопроса...
получается, что, коль уж я стартую скрипт из конфига Апача - мне вовсе необязательно в этом скрипте использовать в теле этого скрипта нечто вроде: while (new CGI::Fast) {
        &process_request;
    }
м? он ведь и так работает у меня как fastcgi-процесс при старте веб-сервера. нет? или я что-то непонимаю?

[NeoNox]

Нужно(обязательно!) запускать в цикле.
При старте сервера порождаются процессы(можно задать их количество) и при запросе он отдается одному из потомков. Вот и вся примудрость.
Это в доке тоже описано (;

Насчет оо.

var ($query);

while ($query = new CGI::Fast)
{
main();
}

sub main
{
print $query->param("user")
}

[AnnA]

NeoNox
:appl:  :chmok:
(+ не удалось поставить. обидно.)
большое человеческое спасибо.
всё работает и довольно быстро.

[NeoNox]

На здоровье (;