Lines Matching refs:LENGTH
4001 my $self = {LENGTH=>$length,
4036 $bad++ if !$ok && $self->{LENGTH} <= 0;
4112 warn "boundary=$self->{BOUNDARY} length=$self->{LENGTH} start=$start\n" if DEBUG;
4115 die "Malformed multipart POST\n" unless $self->{CHUNKED} || ($start >= 0 || $self->{LENGTH} > 0);
4126 $self->{LENGTH}=0;
4161 return unless $self->{CHUNKED} || $self->{LENGTH};
4166 $bytesToRead = $self->{LENGTH} if !$self->{CHUNKED} && $self->{LENGTH} < $bytesToRead;
4187 $self->{LENGTH} -= $bytesRead if !$self->{CHUNKED} && $bytesRead;
4197 && ($self->{LENGTH} <= 0);