🔐 Sid Gifari File Manager Pro
v8.0.5 | 2026-06-14 18:24:30 | PHP 8.1.34
📂
/ (Root)
/
usr
/
lib64
/
perl5
/
vendor_perl
/
auto
/
Net
/
SSLeay
📍 /usr/lib64/perl5/vendor_perl/auto/Net/SSLeay
🔄 Refresh
✏️
Editing: tcp_read_all.al
Read Only
# NOTE: Derived from blib/lib/Net/SSLeay.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package Net::SSLeay; #line 1187 "blib/lib/Net/SSLeay.pm (autosplit into blib/lib/auto/Net/SSLeay/tcp_read_all.al)" sub tcp_read_all { my ($how_much) = @_; $how_much = 2000000000 unless $how_much; my ($n, $got, $errs); my $reply = ''; my $bsize = 0x10000; while ($how_much > 0) { $n = sysread(SSLCAT_S,$got, (($bsize < $how_much) ? $bsize : $how_much)); warn "Read error: $! ($n,$how_much)" unless defined $n; last if !$n; # EOF $how_much -= $n; debug_read(\$reply, \$got) if $trace>1; $reply .= $got; } return wantarray ? ($reply, $errs) : $reply; } # end of Net::SSLeay::tcp_read_all 1;
💾 Save Changes
❌ Cancel