Branch Coverage

blib/lib/Cogit/Protocol.pm
Criterion Covered Total %
branch 0 32 0.0


line true false branch
26 0 0 if ($self->remote =~ m[^git://(.*?@)?(.*?)(/.*)]) { }
0 0 elsif ($self->remote =~ m[^file://(/.*)]) { }
0 0 elsif ($self->remote =~ m[^ssh://(?:(.*?)@)?(.*?)(/.*)] or $self->remote =~ /^(?:(.*?)@)?(.*?):(.*)/) { }
36 0 0 $1 ? :
77 0 0 if ($line =~ s/^\x02//) { }
0 0 elsif ($line =~ /^NAK\n/) { }
0 0 elsif ($line =~ s/^\x01//) { }
94 0 0 if ($length == 0) { }
104 0 0 unless $self->write_socket->print($text)
115 0 0 if (not defined $got) { }
0 0 elsif ($got == 0) { }
121 0 0 if (length $ret == $len)
133 0 0 if $prefix eq '0000'
142 0 0 if ($c ge '0' and $c le '9') { }
0 0 elsif ($c ge 'a' and $c le 'f') { }
0 0 elsif ($c ge 'A' and $c le 'F') { }