| line |
true |
false |
branch |
|
138
|
0 |
0 |
if (exists $params{$var}) { } |
|
197
|
0 |
0 |
if $pfile |
|
201
|
0 |
0 |
if (not $$self{'filename'} && -e $$self{'filename'}) { } |
|
|
0 |
0 |
elsif (uc $$self{'lineconvert'} eq 'YES') { } |
|
230
|
0 |
0 |
unless (-e $files[0]) |
|
239
|
0 |
0 |
if ($sock) { } |
|
249
|
0 |
0 |
unless ($resp) |
|
258
|
0 |
0 |
unless ($resp) |
|
267
|
0 |
0 |
if uc $$self{'lineconvert'} eq 'YES' |
|
305
|
0 |
0 |
unless ($fh) |
|
313
|
0 |
0 |
unless $self->printfile($tmpfile) |
|
342
|
0 |
0 |
unless ($sock) |
|
370
|
0 |
0 |
if ($@) |
|
371
|
0 |
0 |
if $@ =~ /timeout/ |
|
410
|
0 |
0 |
if uc $$self{'debug'} eq 'YES' |
|
500
|
0 |
0 |
unless ($ofh) |
|
504
|
0 |
0 |
unless ($nfh) |
|
539
|
0 |
0 |
if (uc $$self{'rfc1179'} eq 'NO') { } |
|
551
|
0 |
0 |
if $sock = 'IO::Socket::INET'->new('PeerAddr', $$self{'server'}, 'PeerPort', $$self{'port'}, 'Proto', 'tcp', 'LocalPort', $p) |
|
602
|
0 |
0 |
unless ($cfh) |
|
653
|
0 |
0 |
if ($gans) |
|
659
|
0 |
0 |
unless $$self{'socket'}->recv($response, 1024) |
|
667
|
0 |
0 |
if ($@) |
|
668
|
0 |
0 |
if ($@ =~ /timeout/) |
|
711
|
0 |
0 |
if ($retcode =~ /\d/ and $retcode == 0) { } |
|
781
|
0 |
0 |
unless ($buf) |
|
794
|
0 |
0 |
unless ($fh) |
|
809
|
0 |
0 |
unless ($len) |
|
810
|
0 |
0 |
if $! =~ /^Interrupted/ |
|
821
|
0 |
0 |
unless $resp |
|
855
|
0 |
0 |
if $$self{'socket'} |