Branch Coverage

blib/lib/Net/FCP.pm
Criterion Covered Total %
branch 0 46 0.0


line true false branch
105 0 0 if $$self{'progress'}
319 0 0 defined $htl ? :
0 0 $removelocal ? :
345 0 0 defined $htl ? :
0 0 $removelocal ? :
396 0 0 if (defined $data) { }
403 0 0 unless socket my $fh, 2, 1, 0
484 0 0 if ($len > 0) { }
0 0 elsif (defined $len) { }
486 0 0 unless (length $$self{'sbuf'})
500 0 0 if (sysread $$self{'fh'}, $$self{'buf'}, 17408, length $$self{'buf'}) { }
502 0 0 if ($$self{'datalen'}) { }
0 0 elsif ($$self{'buf'} =~ s/^DataChunk\015?\012Length=([0-9a-fA-F]+)\015?\012Data\015?\012//) { }
0 0 elsif ($$self{'buf'} =~ s/^([a-zA-Z]+)\015?\012(?:(.+?)\015?\012)?EndMessage\015?\012//s) { }
504 0 0 if (length $$self{'buf'} >= $$self{'datalen'}) { }
533 0 0 if (my $method = $self->can("rcv_$type")) { }
560 0 0 unless (exists $$self{'result'})
562 0 0 if exists $$self{'cb'}
575 0 0 unless (exists $$self{'result'})
605 0 0 if $$self{'exception'}
699 0 0 if ($$self{'datalength'} == length $$self{'data'})
783 0 0 @_ >= 2 ? :
798 0 0 @_ >= 2 ? :