line |
true |
false |
branch |
26
|
13 |
23 |
if @_ |
44
|
0 |
21 |
if exists $args{'verbose'} |
52
|
4 |
17 |
if exists $args{'version'} |
77
|
2 |
17 |
if defined &{$globname;} |
89
|
13 |
8 |
unless $intended |
91
|
3 |
18 |
unless $value |
92
|
2 |
16 |
if not $intended and defined &$new |
93
|
2 |
14 |
if defined &$new |
98
|
2 |
12 |
if ref $value eq 'CODE' |
101
|
1 |
15 |
if @_ |
115
|
27 |
13 |
if (@_ == 1) { } |
117
|
20 |
0 |
ref $parsers eq 'ARRAY' ? : |
|
7 |
20 |
ref $parsers eq 'HASH' ? : |
150
|
3 |
9 |
unless UNIVERSAL::isa($pkg, 'DateTime::Format::Builder') or UNIVERSAL::isa($pkg, 'DateTime::Format::Builder::Parser') |
159
|
1 |
10 |
if @_ |
164
|
2 |
8 |
if (ref $class) |
181
|
0 |
6 |
ref $class ? : |
190
|
0 |
1 |
unless ref $self |
196
|
0 |
8 |
unless $parser and ref $parser eq 'CODE' |
210
|
0 |
14 |
unless ref $self and $self->isa('DateTime::Format::Builder') |
212
|
0 |
14 |
unless @_ |