| line |
true |
false |
branch |
|
19
|
4 |
2 |
unless $arg{'macro_format'} |
|
30
|
17 |
8 |
unless @_ |
|
33
|
2 |
6 |
unless ref $macro_format eq 'Regexp' |
|
45
|
1 |
26 |
if ref $value and ref $value ne 'CODE' |
|
48
|
20 |
6 |
if (not ref $name) { } |
|
|
5 |
1 |
elsif (ref $name eq 'Regexp') { } |
|
64
|
0 |
0 |
if (@macros) { } |
|
77
|
18 |
9 |
if exists $$self{'macro'}{$macro_name} |
|
80
|
6 |
2 |
if $macro_name =~ /$$regexp[0]/ |
|
90
|
1 |
8 |
if (eval {
do {
$object->isa('Macro::Micro::Template')
}
}) |
|
102
|
0 |
8 |
unless defined $macro |
|
103
|
3 |
5 |
ref $macro ? : |
|
106
|
0 |
1 |
unless $object->_parts |
|
108
|
8 |
8 |
ref $_ ? : |
|
116
|
2 |
4 |
if not ref $object or ref $object ne 'SCALAR' |
|
135
|
0 |
13 |
unless defined $object |
|
136
|
1 |
12 |
if ref $object |
|
152
|
11 |
2 |
if (values %{$$self{'macro_regexp'};}) { } |
|
154
|
0 |
17 |
if defined $cached{$_[0]} |
|
158
|
8 |
8 |
ref $macro ? : |
|
|
16 |
1 |
defined $macro ? : |
|
167
|
0 |
7 |
if defined $cached{$_[0]} |
|
171
|
0 |
7 |
ref $macro ? : |
|
|
7 |
0 |
defined $macro ? : |
|
193
|
7 |
1 |
length $snippet ? : |
|
|
8 |
0 |
$whole ? : |
|
198
|
1 |
3 |
if defined $pos |