| line |
true |
false |
branch |
|
20
|
0 |
0 |
if exists $pkg{'TEMPL_TAGS'} |
|
21
|
0 |
0 |
if exists $pkg{'TEMPL_HEADERS'} |
|
29
|
0 |
0 |
unless defined $class |
|
31
|
0 |
0 |
if ref $class and $class->isa($PKG) |
|
33
|
0 |
0 |
if ref $class |
|
35
|
0 |
0 |
unless $class =~ /^(\w+\:\:)*\w+$/ |
|
37
|
0 |
0 |
if $class eq $PKG |
|
39
|
0 |
0 |
unless (_subclass_loaded $class) |
|
41
|
0 |
0 |
unless (_subclass_loaded $class) |
|
45
|
0 |
0 |
unless $class->isa($PKG) |
|
55
|
0 |
0 |
defined $info[0] ? : |
|
56
|
0 |
0 |
if not $pkg or $pkg eq 'Templ::Spec' or $pkg eq 'Templ' |
|
57
|
0 |
0 |
wantarray ? : |
|
65
|
0 |
0 |
if (not ref $_[0]) { } |
|
68
|
0 |
0 |
unless -f $filename |
|
70
|
0 |
0 |
unless defined $fh |
|
76
|
0 |
0 |
unless (openhandle $fh or eval {
do {
$fh->can('getline')
}
}) |
|
94
|
0 |
0 |
if (scalar @_ == 1) { } |
|
|
0 |
0 |
elsif (scalar @_ == 2) { } |
|
96
|
0 |
0 |
if (ref $source) { } |
|
106
|
0 |
0 |
if ($type eq 'file') { } |
|
149
|
0 |
0 |
unless scalar @{$this_class . '::TEMPL_TAGS';} |
|
152
|
0 |
0 |
wantarray ? : |
|
160
|
0 |
0 |
unless scalar @{$this_class . '::TEMPL_HEADERS';} |
|
179
|
0 |
0 |
unless (defined $$self{'as_perl'}) |
|
191
|
0 |
0 |
unless (defined $$self{'as_pretty_perl'}) |
|
202
|
0 |
0 |
unless (defined $$self{'as_sub'}) |
|
207
|
0 |
0 |
if $@ |
|
216
|
0 |
0 |
unless (defined $$self{'as_method'}) |
|
222
|
0 |
0 |
if $@ |
|
232
|
0 |
0 |
unless (defined $$self{'as_print'}) |
|
244
|
0 |
0 |
unless (defined $$self{'as_pretty_print'}) |
|
255
|
0 |
0 |
unless (defined $$self{'as_print_sub'}) |
|
260
|
0 |
0 |
if $@ |