Lines Matching refs:fh
322 sysopen my $fh, $tempfile, Fcntl::O_CREAT()|Fcntl::O_EXCL()|Fcntl::O_WRONLY()
324 binmode $fh;
325 $args->{data_callback} = sub { print {$fh} $_[0] };
327 close $fh
1091 if ( $self->{fh} && $self->{fh}->can('timeout') ) {
1092 $self->{fh}->timeout($timeout);
1106 $self->{fh} = $SOCKET_CLASS->new(
1116 binmode($self->{fh})
1120 unless ( defined( $self->{fh}->setsockopt( SOL_SOCKET, SO_KEEPALIVE, 1 ) ) ) {
1121 CORE::close($self->{fh});
1140 if ( $self->{fh} && $self->{fh}->connected ) {
1142 ? ( $self->{fh}->peerhost, $self->{fh}->peerport )
1143 : join( ':', $self->{fh}->peerhost, $self->{fh}->peerport );
1154 if ( ref($self->{fh}) eq 'IO::Socket::SSL' ) {
1155 unless ( $self->{fh}->stop_SSL ) {
1163 $self->{fh},
1171 unless ( ref($self->{fh}) eq 'IO::Socket::SSL' ) {
1180 CORE::close($self->{fh})
1201 my $r = syswrite($self->{fh}, $buf, $len, $off);
1211 if ($self->{fh}->can('errstr')){
1212 my $err = $self->{fh}->errstr();
1245 my $r = sysread($self->{fh}, $buf, $len, length $buf);
1251 if ($self->{fh}->can('errstr')){
1252 my $err = $self->{fh}->errstr();
1279 my $r = sysread($self->{fh}, $self->{rbuf}, BUFSIZE, length $self->{rbuf});
1284 if ($self->{fh}->can('errstr')){
1285 my $err = $self->{fh}->errstr();
1579 my $fd = fileno $self->{fh};
1608 if ( ref($self->{fh}) eq 'IO::Socket::SSL' ) {
1609 return 1 if $self->{fh}->pending;