Branch Coverage

blib/lib/Net/Connection/Match/Protos.pm
Criterion Covered Total %
branch 12 14 85.7


line true false branch
74 2 1 if (defined $_[1])
79 1 2 unless (defined $args{'protos'})
82 0 2 if (ref \$args{'protos'} eq 'ARRAY')
85 0 2 unless (defined $args{'protos'}[0])
123 1 4 unless (defined $object)
127 1 3 if (ref $object ne 'Net::Connection')
133 2 1 if ($self->{'protos'}[$protos_int] eq lc $object->proto)