| Subject: | if $lenght>limit_on_{ } module die |
in {n,m} n and m are limited to integral values less
than a preset limit defined when perl is built. This is
usually 32766 on the most common platforms. The actual
limit can be seen in the error message generated by code
such as this:
$_ **= $_ , / {$_} / for 2 .. 42;
So your module should use loops to fetch data from buffer, for example here:
package PHP::Session::Serializer::PHP::State::String;
sub parse {
my($self, $decoder) = @_;
my $length = $decoder->pop_stack();
$decoder->{buffer} =~ s/^"(.{$length})";//s or $decoder->weird;
$decoder->process_value($1);
}