| line |
true |
false |
branch |
|
17
|
0 |
0 |
if exists $codes{$_} |
|
20
|
0 |
0 |
unless my $name = shift() |
|
21
|
0 |
0 |
unless exists $codes{$name} |
|
22
|
0 |
0 |
defined $codes{$name} ? : |
|
32
|
0 |
1877 |
unless my $code = shift() |
|
33
|
0 |
1877 |
unless $code |
|
35
|
0 |
1877 |
unless ($self->init($code, @_)) |
|
44
|
0 |
1877 |
unless my $code = shift() |
|
46
|
0 |
1877 |
unless $$codes{$code} |
|
49
|
1877 |
0 |
if scalar @_ |
|
57
|
0 |
0 |
@_ ? : |
|
58
|
0 |
0 |
unless ($target) |
|
62
|
0 |
0 |
if (bad_name($target)) |
|
67
|
0 |
0 |
unless ($pack->require) |
|
73
|
0 |
0 |
unless $codes{$target} |
|
79
|
0 |
0 |
if (@_) |
|
82
|
0 |
0 |
ref $incoming ? : |
|
92
|
1877 |
0 |
@_ ? : |
|
105
|
12 |
1865 |
unless (%Business::EDI::DataElement::code_hash) |