Branch Coverage

blib/lib/Net/Connection/Match/UID.pm
Criterion Covered Total %
branch 20 32 62.5


line true false branch
85 1 1 if (defined $_[1])
90 1 1 unless (defined $args{'uids'})
93 0 1 if (ref \$args{'uids'} eq 'ARRAY')
96 0 1 unless (defined $args{'uids'}[0])
126 1 4 unless (defined $object)
130 1 3 if (ref $object ne 'Net::Connection')
138 0 3 unless (defined $conn_uid)
146 1 4 if ($uid =~ /^[0-9]+$/ and $uid eq $conn_uid) { }
0 4 elsif ($uid =~ /^\<\=[0-9]+$/) { }
0 4 elsif ($uid =~ /^\<[0-9]+$/) { }
0 4 elsif ($uid =~ /^\>\=[0-9]+$/) { }
2 2 elsif ($uid =~ /^\>[0-9]+$/) { }
153 0 0 if ($conn_uid <= $uid)
158 0 0 if ($conn_uid < $uid)
163 0 0 if ($conn_uid >= $uid)
168 1 1 if ($conn_uid > $uid)