| … | |
… | |
| 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.331; |
19 | our $VERSION = 4.412; |
| 20 | |
20 | |
| 21 | =head1 SYNOPSIS |
21 | =head1 SYNOPSIS |
| 22 | |
22 | |
| 23 | use AnyEvent; |
23 | use AnyEvent; |
| 24 | use AnyEvent::Handle; |
24 | use AnyEvent::Handle; |
| … | |
… | |
| 1473 | |
1473 | |
| 1474 | delete @$self{qw(_rbio _wbio _tls_wbuf)}; |
1474 | delete @$self{qw(_rbio _wbio _tls_wbuf)}; |
| 1475 | } |
1475 | } |
| 1476 | |
1476 | |
| 1477 | sub DESTROY { |
1477 | sub DESTROY { |
| 1478 | my $self = shift; |
1478 | my ($self) = @_; |
| 1479 | |
1479 | |
| 1480 | &_freetls; |
1480 | &_freetls; |
| 1481 | |
1481 | |
| 1482 | my $linger = exists $self->{linger} ? $self->{linger} : 3600; |
1482 | my $linger = exists $self->{linger} ? $self->{linger} : 3600; |
| 1483 | |
1483 | |
