line |
true |
false |
branch |
30
|
1 |
0 |
($stat = $self->_init(@_)) ? : |
73
|
0 |
1 |
if (ref(my $classes = $opt{'register'})) |
76
|
0 |
1 |
if (my $lexer = $opt{'lexer'}) { } |
|
0 |
1 |
elsif (my $lex = $opt{'lex'}) { } |
82
|
0 |
0 |
unless $lex->value($self) |
106
|
0 |
0 |
if (UNIVERSAL::isa($_, 'WebDAO::Element')) { } |
|
0 |
0 |
elsif (ref $_ eq 'CODE') { } |
|
0 |
0 |
elsif (UNIVERSAL::isa($_, 'WebDAO::Response')) { } |
107
|
0 |
0 |
if UNIVERSAL::can($_, 'pre_fetch') |
111
|
0 |
0 |
if UNIVERSAL::can($_, 'post_fetch') |
120
|
0 |
0 |
unless $_->_is_file_send |
139
|
0 |
0 |
if (my $res = $inject_fetch->{$path}) { } |
154
|
0 |
0 |
if (UNIVERSAL::isa($root, 'WebDAO::Container')) { } |
158
|
0 |
0 |
unless UNIVERSAL::isa($_, 'WebDAO::Modal') |
205
|
0 |
0 |
unless (defined $res) |
214
|
0 |
0 |
if (not ref $res or ref $res eq 'SCALAR') |
215
|
0 |
0 |
ref $res ? : |
218
|
0 |
0 |
if (ref $res eq 'HASH' and $response->wantformat('json')) |
222
|
0 |
0 |
if (UNIVERSAL::isa($res, 'WebDAO::Response')) |
224
|
0 |
0 |
if $res->is_empty |
225
|
0 |
0 |
if ($res->_is_modal) |
228
|
0 |
0 |
unless $res->_is_file_send |
239
|
0 |
0 |
if (UNIVERSAL::isa($src, 'WebDAO::Modal')) |
247
|
0 |
0 |
if (not ref $res or ref $res eq 'SCALAR') { } |
|
0 |
0 |
elsif ($res == $src) { } |
257
|
0 |
0 |
if (UNIVERSAL::isa($res, 'WebDAO::Element')) |
264
|
0 |
0 |
if ($need_inject_result) |
275
|
0 |
0 |
if ($ev->{'event'} eq 'start') { } |
|
0 |
0 |
elsif ($ev->{'event'} eq 'inject') { } |
|
0 |
0 |
elsif ($ev->{'event'} eq 'fetch') { } |
|
0 |
0 |
elsif ($ev->{'event'} eq 'end') { } |
276
|
0 |
0 |
if UNIVERSAL::can($obj, 'pre_fetch') |
287
|
0 |
0 |
if UNIVERSAL::can($obj, 'fetch') |
293
|
0 |
0 |
if UNIVERSAL::can($obj, 'post_fetch') |
307
|
0 |
0 |
if ref $ref_sub |
318
|
0 |
0 |
unless (exists $ev_hash->{$event_name}) |
342
|
0 |
0 |
$pack->isa('WebDAO::Element') ? : |
348
|
0 |
0 |
if ($pack->isa('WebDAO::Element')) |
353
|
0 |
0 |
if $@ |
368
|
0 |
0 |
if exists $ref->{$name} |
381
|
0 |
2 |
unless (exists $main->{$module}) |
384
|
0 |
0 |
if ($@) |
393
|
2 |
0 |
if defined $alias |