| … | |
… | |
| 489 | } |
489 | } |
| 490 | } elsif (defined $len) { |
490 | } elsif (defined $len) { |
| 491 | undef $rw; undef $ww; # it ends here |
491 | undef $rw; undef $ww; # it ends here |
| 492 | |
492 | |
| 493 | if (@rcb || %rcb) { |
493 | if (@rcb || %rcb) { |
| 494 | use Data::Dump;ddx[\@rcb,\%rcb];#d# |
|
|
| 495 | $on_error->("unexpected eof"); |
494 | $on_error->("unexpected eof"); |
| 496 | } else { |
495 | } else { |
| 497 | $on_destroy->(); |
496 | $on_destroy->(); |
| 498 | } |
497 | } |
| 499 | } elsif ($! != Errno::EAGAIN && $! != Errno::EWOULDBLOCK) { |
498 | } elsif ($! != Errno::EAGAIN && $! != Errno::EWOULDBLOCK) { |
