… | |
… | |
14 | |
14 | |
15 | AnyEvent::Handle - non-blocking I/O on file handles via AnyEvent |
15 | AnyEvent::Handle - non-blocking I/O on file handles via AnyEvent |
16 | |
16 | |
17 | =cut |
17 | =cut |
18 | |
18 | |
19 | our $VERSION = 4.14; |
19 | our $VERSION = 4.151; |
20 | |
20 | |
21 | =head1 SYNOPSIS |
21 | =head1 SYNOPSIS |
22 | |
22 | |
23 | use AnyEvent; |
23 | use AnyEvent; |
24 | use AnyEvent::Handle; |
24 | use AnyEvent::Handle; |
… | |
… | |
242 | $self->{_activity} = AnyEvent->now; |
242 | $self->{_activity} = AnyEvent->now; |
243 | $self->_timeout; |
243 | $self->_timeout; |
244 | |
244 | |
245 | $self->on_drain (delete $self->{on_drain}) if $self->{on_drain}; |
245 | $self->on_drain (delete $self->{on_drain}) if $self->{on_drain}; |
246 | |
246 | |
|
|
247 | $self->start_read |
|
|
248 | if $self->{on_read}; |
|
|
249 | |
247 | $self |
250 | $self |
248 | } |
251 | } |
249 | |
252 | |
250 | sub _shutdown { |
253 | sub _shutdown { |
251 | my ($self) = @_; |
254 | my ($self) = @_; |
… | |
… | |
500 | =cut |
503 | =cut |
501 | |
504 | |
502 | register_write_type packstring => sub { |
505 | register_write_type packstring => sub { |
503 | my ($self, $format, $string) = @_; |
506 | my ($self, $format, $string) = @_; |
504 | |
507 | |
505 | pack "$format/a", $string |
508 | pack "$format/a*", $string |
506 | }; |
509 | }; |
507 | |
510 | |
508 | =item json => $array_or_hashref |
511 | =item json => $array_or_hashref |
509 | |
512 | |
510 | Encodes the given hash or array reference into a JSON object. Unless you |
513 | Encodes the given hash or array reference into a JSON object. Unless you |
… | |
… | |
556 | register_write_type storable => sub { |
559 | register_write_type storable => sub { |
557 | my ($self, $ref) = @_; |
560 | my ($self, $ref) = @_; |
558 | |
561 | |
559 | require Storable; |
562 | require Storable; |
560 | |
563 | |
561 | pack "w/a", Storable::nfreeze ($ref) |
564 | pack "w/a*", Storable::nfreeze ($ref) |
562 | }; |
565 | }; |
563 | |
566 | |
564 | =back |
567 | =back |
565 | |
568 | |
566 | =item AnyEvent::Handle::register_write_type type => $coderef->($handle, @args) |
569 | =item AnyEvent::Handle::register_write_type type => $coderef->($handle, @args) |