1N/A my $
size =
shift ||
croak 'read($buf,$size,[$offset])';
1N/A ${*$
data}{
'net_ftp_bytesread'} += $n;
1N/A my $
size =
shift ||
croak 'write($buf,$size,[$timeout])';
1N/A # If the remote server has closed the connection we will be signal'd 1N/A # when we write. This can happen if the disk on the remote server fills up 1N/A local $
SIG{
PIPE} =
'IGNORE' unless $^O
eq 'MacOS';