| line |
true |
false |
branch |
|
111
|
0 |
2 |
if ref(my $class = shift()) |
|
119
|
0 |
2 |
unless @_ |
|
123
|
0 |
19 |
unless defined $_[$i] and ref $_[$i] eq 'HASH' |
|
133
|
0 |
4 |
unless exists $_[$i]{'abbr'} or exists $_[$i]{'name'} |
|
140
|
10 |
28 |
unless exists $_[$i]{$f->[0]} |
|
143
|
0 |
28 |
unless defined $val |
|
153
|
0 |
28 |
if exists $self{$f->[0]}{$val} |
|
159
|
0 |
19 |
if (exists $_[$i]{'descr'}) |
|
161
|
0 |
0 |
unless defined $descr |
|
186
|
0 |
2 |
unless ref(my $self = shift()) |
|
188
|
0 |
2 |
unless @_ |
|
191
|
0 |
0 |
defined $_[0] ? : |
|
|
0 |
2 |
unless defined $_[0] and $_[0] =~ /^\d+$/ |
|
201
|
0 |
2 |
if $_[0] >> @{$self->{'list'};} |
|
219
|
0 |
1 |
unless ref(my $self = shift()) |
|
239
|
0 |
2 |
unless ref(my $self = shift()) |
|
241
|
0 |
2 |
unless @_ |
|
246
|
0 |
4 |
unless defined $t |
|
251
|
1 |
3 |
if (exists $self->{'abbr'}{$t}) { } |
|
|
3 |
0 |
elsif (exists $self->{'name'}{$t}) { } |
|
278
|
0 |
2 |
unless ref(my $self = shift()) |
|
280
|
0 |
2 |
unless @_ |
|
285
|
0 |
2 |
unless defined $t |
|
290
|
1 |
1 |
if (exists $self->{'abbr'}{$t}) { } |
|
|
1 |
0 |
elsif (exists $self->{'name'}{$t}) { } |
|
318
|
0 |
2 |
unless ref(my $self = shift()) |
|
320
|
0 |
2 |
unless @_ |
|
325
|
0 |
2 |
unless defined $t |
|
328
|
1 |
1 |
if (exists $self->{'abbr'}{$t}) { } |
|
|
1 |
0 |
elsif (exists $self->{'name'}{$t}) { } |
|
350
|
0 |
2 |
unless ref(my $self = shift()) |
|
370
|
0 |
3 |
unless ref(my $self = shift()) |
|
379
|
19 |
3 |
if ($prefer_abbr) { } |
|
380
|
15 |
4 |
defined $b->[0] ? : |
|
383
|
15 |
4 |
defined $b->[0] ? : |
|
385
|
2 |
1 |
defined $b->[1] ? : |
|
388
|
2 |
1 |
defined $b->[1] ? : |
|
392
|
5 |
17 |
if $self->{'value'} & $v |
|
397
|
3 |
0 |
wantarray ? : |