| line |
true |
false |
branch |
|
59
|
0 |
0 |
$HTML::Mason::CGIHandler::VERSION ? : |
|
|
0 |
0 |
$HTML::Mason::ApacheHandler::VERSION ? : |
|
89
|
0 |
0 |
if defined $value |
|
96
|
0 |
0 |
if defined $value |
|
104
|
0 |
0 |
if defined $value |
|
113
|
0 |
0 |
unless ($self->{'adjusted_args_initialised'}) |
|
119
|
0 |
0 |
unless ($key) |
|
121
|
0 |
0 |
if (wantarray) { } |
|
133
|
0 |
0 |
unless defined $value |
|
144
|
0 |
0 |
if (defined $exclude_paths) |
|
149
|
0 |
0 |
$exclude_paths ? : |
|
154
|
0 |
0 |
if (defined $exclude_roots) |
|
159
|
0 |
0 |
$exclude_roots ? : |
|
172
|
0 |
0 |
if ($path eq 'SELF') |
|
175
|
0 |
0 |
if ($path eq 'PARENT') |
|
177
|
0 |
0 |
if not $c and defined $error |
|
180
|
0 |
0 |
if ($path eq 'REQUEST') |
|
187
|
0 |
0 |
if (index($path, ':') != -1) |
|
190
|
0 |
0 |
if (my $owner_comp = $self->fetch_comp($owner_path, $current_comp, $error)) { } |
|
191
|
0 |
0 |
if ($owner_comp->_locate_inherited('methods', $method_name, \$method_comp)) { } |
|
194
|
0 |
0 |
if ($owner_path =~ /^(INHERIT|SUPER)/) |
|
198
|
0 |
0 |
if $owner_path eq 'SUPER' |
|
201
|
0 |
0 |
if (my $owner_comp = $self->fetch_comp($root->[0] . '=>' . $owner_path, $current_comp, $error)) |
|
203
|
0 |
0 |
if ($owner_comp->_locate_inherited('methods', $method_name, \$method_comp)) |
|
209
|
0 |
0 |
if defined $error |
|
212
|
0 |
0 |
if defined $error |
|
215
|
0 |
0 |
if defined $error |
|
222
|
0 |
0 |
if ($path =~ /(SUPER|INHERIT)$/) |
|
224
|
0 |
0 |
if $path =~ /SUPER$/ |
|
228
|
0 |
0 |
if ($path =~ /^_/) |
|
232
|
0 |
0 |
if ($path =~ /::SELECTED/) |
|
244
|
0 |
0 |
unless ($path =~ m[/]) |
|
246
|
0 |
0 |
if (my $subcomp = $current_comp->subcomps($path)) |
|
251
|
0 |
0 |
if ($current_comp->is_subcomp and my $subcomp = $current_comp->owner->subcomps($path)) |
|
266
|
0 |
0 |
if (not $comp and $self->pseudodhandler_name) |
|
295
|
0 |
0 |
unless ($comp) |
|
300
|
0 |
0 |
if ($comp) |
|
308
|
0 |
0 |
if $path =~ /=>$/ |
|
324
|
0 |
0 |
if (wantarray) { } |
|
333
|
0 |
0 |
wantarray ? : |
|
352
|
0 |
0 |
unless (ref $comp) |
|
353
|
0 |
0 |
unless defined $comp |
|
357
|
0 |
0 |
unless $comp = $self->fetch_comp($path, undef, \$error) |
|
365
|
0 |
0 |
if $depth >= $self->{'max_recurse'} |
|
371
|
0 |
0 |
defined $mods{'store'} ? : |
|
372
|
0 |
0 |
$comp->{'has_filter'} ? : |
|
374
|
0 |
0 |
exists $mods{'flushable'} ? : |
|
391
|
0 |
0 |
if ($self->{'has_plugins'}) |
|
411
|
0 |
0 |
if ($wantarray) { } |
|
|
0 |
0 |
elsif (defined $wantarray) { } |
|
425
|
0 |
0 |
if ($comp->{'has_filter'}) { } |
|
430
|
0 |
0 |
if (defined $comp->filter) |
|
437
|
0 |
0 |
if ($filter_newlines and $filter_newlines ne 'none') |
|
438
|
0 |
0 |
$filter_newlines eq 'all' ? : |
|
448
|
0 |
0 |
if ($self->{'has_plugins'}) |
|
464
|
0 |
0 |
if $error |
|
465
|
0 |
0 |
$wantarray ? : |
|
498
|
0 |
0 |
unless (@_) |
|
501
|
0 |
0 |
wantarray ? : |
|
506
|
0 |
0 |
wantarray ? : |
|
517
|
0 |
0 |
if (ref $root eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $root eq 'HASH') { } |
|
520
|
0 |
0 |
if (scalar @inner_root == 2) |
|
522
|
0 |
0 |
unless (ref $inner_root[0] eq 'ARRAY') |
|
524
|
0 |
0 |
if index($inner_root[0], '=>') == -1 |
|
537
|
0 |
0 |
if @strings |
|
551
|
0 |
0 |
if (ref $foo ne 'ARRAY') |
|
581
|
0 |
0 |
unless $params{'namespace'} or $params{'name'} |
|
599
|
0 |
0 |
if ($unlock) |
|
603
|
0 |
0 |
if $self->{'_REGISTER'}{$namespace}{$name}{'locked'} |
|
604
|
0 |
0 |
if ($lock) |
|
609
|
0 |
0 |
if ($remove) |
|
611
|
0 |
0 |
if ($self->{'_REGISTER'}{$namespace}{$name}{'priority'}) |
|
615
|
0 |
0 |
if defined $priority and $priority != $key |
|
619
|
0 |
0 |
if ($bundle->{'marker'} =~ /^$remove$/) { } |
|
634
|
0 |
0 |
unless (defined $content or $contents) |
|
637
|
0 |
0 |
if ($self->{'_REGISTER'}{$namespace}{$name}{'priority'}) |
|
641
|
0 |
0 |
if defined $priority and $priority != $key |
|
648
|
0 |
0 |
if ($clear) |
|
652
|
0 |
0 |
unless (wantarray) |
|
656
|
0 |
0 |
if ($clear) |
|
663
|
0 |
0 |
unless defined $priority |
|
666
|
0 |
0 |
if $priority < 0 |
|
667
|
0 |
0 |
if $priority > 1 |
|
670
|
0 |
0 |
unless ($marker) |
|
672
|
0 |
0 |
if ($marker_key) { } |
|
678
|
0 |
0 |
ref $content ? : |
|
682
|
0 |
0 |
if ($clear_priority) |
|
688
|
0 |
0 |
if ($contents) |
|
703
|
0 |
0 |
unless ($allow_duplicates and not $overwrite) |
|
705
|
0 |
0 |
if ($self->{'_REGISTER'}{$namespace}{$name}{'scoreboard'}{$priority}{$marker}) |
|
707
|
0 |
0 |
unless $overwrite |
|
754
|
0 |
0 |
if (scalar(@_) % 2) |
|
759
|
0 |
0 |
if defined $name |
|
761
|
0 |
0 |
unless ($params{'name'}) |
|
764
|
0 |
0 |
unless $name |
|
765
|
0 |
0 |
if (scalar(@_) % 2) |
|
770
|
0 |
0 |
if defined $content |
|
771
|
0 |
0 |
if defined $name |
|
786
|
0 |
0 |
if defined $var_value |