| line |
true |
false |
branch |
|
12
|
0 |
33 |
if (defined(my $kw = shift())) |
|
13
|
0 |
0 |
if ($kw eq ':default') { } |
|
|
0 |
0 |
elsif ($kw eq ':optimized') { } |
|
21
|
0 |
33 |
if (@_) |
|
33
|
0 |
31 |
unless my $self = $class->SUPER::new($file, @_) |
|
41
|
1 |
30 |
if ($@) |
|
53
|
10 |
18 |
if ($str =~ s/^"(.*)"$/$1/) |
|
67
|
3 |
38 |
if (ref $_ eq 'HASH') { } |
|
|
0 |
38 |
elsif (ref $_ eq 'ARRAY') { } |
|
110
|
0 |
0 |
unless @$modlist |
|
118
|
0 |
0 |
unless $msg =~ /uninitialized/ |
|
122
|
0 |
0 |
if ($mod->expand($d, \my @repl)) |
|
130
|
0 |
0 |
if ($d->type eq 'section') |
|
149
|
0 |
240 |
unless @$modlist |
|
155
|
229 |
1807 |
if ($mod->expand($d, \my @repl)) |
|
159
|
209 |
1598 |
if ($d->type eq 'section') |
|
186
|
24 |
7 |
unless ($self->can('_preproc_section_internal')) |
|
187
|
24 |
0 |
if ('version'->parse($Apache::Admin::Config::VERSION) == 'version'->parse('0.95') or exists $self->{'children'} and ref $self->{'tree'}{'children'} eq 'ARRAY') { } |
|
201
|
736 |
239 |
if ($n < @{$self->{'children'};}) |