small optimization

mojolicious · Nov 28, 2012 · 9b5d2c5 · 9b5d2c5
1 parent cfe45b3
commit 9b5d2c5
Showing 1 changed file with 2 additions and 3 deletions.
diff --git a/lib/Mojo/Content.pm b/lib/Mojo/Content.pm
@@ -249,21 +249,20 @@ sub _parse_chunked {
     if ($self->{chunk_state} // '') eq 'trailing_headers';
 
   # Parse chunks
-  while (length $self->{pre_buffer}) {
+  while (my $len = length $self->{pre_buffer}) {
 
     # Start new chunk (ignore the chunk extension)
     unless ($self->{chunk_len}) {
       last
         unless $self->{pre_buffer} =~ s/^(?:\x0d?\x0a)?([[:xdigit:]]+).*\x0a//;
       next if $self->{chunk_len} = hex $1;
 
-      # Last chunk_state
+      # Last chunk
       $self->{chunk_state} = 'trailing_headers';
       last;
     }
 
     # Remove as much as possible from payload
-    last unless my $len = length $self->{pre_buffer};
     $len = $self->{chunk_len} if $self->{chunk_len} < $len;
     $self->{buffer} .= substr $self->{pre_buffer}, 0, $len, '';
     $self->{real_size} += $len;