OP
Size: a a a
OP
AP
AP
OP
my $read_body_sub = sub {
$self->{raw_body} = '';
my $buffer;
while ($cl && $self->_input->read($buffer, $cl))
{
$self->{raw_body} .= $buffer;
$cl -= length $buffer;
}
};
OP
AP
AP
OP
OP
OP
OP
AP
OP
OP
OP
AP
AP
AP
OP
AP
psgix.io
, но нет механизма как из протокола псги выскочить без закрытия сокета