| line |
true |
false |
branch |
|
50
|
4 |
2 |
unless $arg{'macro_format'} |
|
76
|
17 |
8 |
unless @_ |
|
79
|
2 |
6 |
unless ref $macro_format eq "Regexp" |
|
102
|
1 |
26 |
if ref $value and ref $value ne "CODE" |
|
105
|
20 |
6 |
if (not ref $name) { } |
|
|
5 |
1 |
elsif (ref $name eq 'Regexp') { } |
|
128
|
0 |
0 |
if (@macros) { } |
|
153
|
18 |
9 |
if exists $self->{'macro'}{$macro_name} |
|
156
|
6 |
2 |
if $macro_name =~ /$regexp->[0]/ |
|
185
|
1 |
8 |
if (eval {
do {
$object->isa("Macro::Micro::Template")
}
}) |
|
197
|
0 |
8 |
unless defined $macro |
|
198
|
3 |
5 |
ref $macro ? : |
|
201
|
0 |
1 |
unless $object->_parts |
|
203
|
8 |
8 |
ref $_ ? : |
|
223
|
2 |
4 |
if not ref $object or ref $object ne "SCALAR" |
|
254
|
0 |
13 |
unless defined $object |
|
255
|
1 |
12 |
if ref $object |
|
283
|
11 |
2 |
if (values %{$$self{'macro_regexp'};}) { } |
|
285
|
0 |
17 |
if defined $cached{$_[0]} |
|
289
|
8 |
8 |
ref $macro ? : |
|
|
16 |
1 |
defined $macro ? : |
|
298
|
0 |
7 |
if defined $cached{$_[0]} |
|
302
|
0 |
7 |
ref $macro ? : |
|
|
7 |
0 |
defined $macro ? : |
|
333
|
7 |
1 |
length $snippet ? : |
|
|
8 |
0 |
$whole ? : |
|
338
|
1 |
3 |
if defined $pos |