| line |
true |
false |
branch |
|
89
|
0 |
0 |
unless $_ eq 'no_caller_data' or ref $_ eq 'ARRAY' and scalar @$_ == 3 and ref $_->[0] eq 'HASH' and defined $_->[0]{'package'}
|
|
92
|
0 |
0 |
if scalar @_ > 1
|
|
93
|
0 |
0 |
if ref $data
|
|
94
|
0 |
0 |
unless defined $data
|
|
98
|
0 |
0 |
$_->[2]{'subroutine'} ? :
|
|
|
0 |
0 |
unless $_ eq 'no_caller_data'
|
|
119
|
0 |
0 |
if ref $args[0] eq 'HASH'
|
|
120
|
0 |
0 |
if ref $args[0] eq 'ARRAY'
|
|
125
|
0 |
0 |
if (ref $item)
|
|
126
|
0 |
0 |
unless ref $item eq 'HASH' and defined $last and not ref $last
|
|
131
|
0 |
0 |
unless defined $hashref->{$item}
|
|
141
|
0 |
0 |
if ref $args[0] eq 'HASH'
|
|
142
|
0 |
0 |
if ref $args[0] eq 'ARRAY'
|
|
148
|
0 |
0 |
if (ref $item)
|
|
149
|
0 |
0 |
unless ref $item eq 'HASH' and defined $last and not ref $last
|
|
154
|
0 |
0 |
unless defined $hashref->{$item}
|
|
155
|
0 |
0 |
unless ref $last
|
|
165
|
1631 |
1339 |
ref $v && ref $v eq 'SCALAR' ? :
|
|
173
|
0 |
0 |
unless ref $ref eq 'CODE'
|
|
188
|
0 |
0 |
if $h->{'package'}
|
|
209
|
0 |
0 |
if ($regex and not eval '$item->{subroutine} =~ /' . $regex . '/')
|
|
213
|
0 |
0 |
if $seq
|
|
227
|
22305 |
0 |
defined $_ ? :
|
|
|
9843 |
184 |
unless @_ == 1 and ref $_[0] eq 'ARRAY'
|
|
228
|
0 |
184 |
unless @{$_[0];} > 0
|
|
238
|
0 |
0 |
if @_ > 0
|
|
239
|
0 |
0 |
if $type eq 'SCALAR'
|
|
240
|
0 |
0 |
if $type eq 'ARRAY'
|
|
241
|
0 |
0 |
if $type eq 'HASH'
|
|
251
|
0 |
0 |
(caller 1)[3] eq 'RapidApp::Util::disp' ? :
|
|
253
|
0 |
0 |
$recurse ? :
|
|
254
|
0 |
0 |
if ref $_[0] eq 'CODE' and @_ > 1 and $recurse == 0
|
|
255
|
0 |
0 |
if ($_{'code'})
|
|
258
|
0 |
0 |
if defined $cust
|
|
261
|
0 |
0 |
if @_ > 1
|
|
263
|
0 |
0 |
unless defined $val
|
|
264
|
0 |
0 |
if (ref $val)
|
|
265
|
0 |
0 |
if ref $val eq 'ARRAY'
|
|
266
|
0 |
0 |
if ref $val eq 'SCALAR'
|
|
267
|
0 |
0 |
if ref $val eq 'HASH'
|
|
278
|
0 |
6 |
unless defined $max_length and $max_length =~ /^\d+$/ and $max_length > 0
|
|
284
|
3 |
3 |
unless defined $str
|
|
285
|
0 |
3 |
if (ref $str)
|
|
298
|
3 |
0 |
if $length <= $max_length
|
|
312
|
0 |
0 |
if ref $method eq 'ARRAY'
|
|
314
|
0 |
0 |
ref $_[0] eq 'HASH' ? :
|
|
329
|
0 |
0 |
if (scalar @namespace > 1)
|
|
334
|
0 |
0 |
if $$debug_arounds_set{$package . '->' . $method}++
|
|
340
|
0 |
0 |
if ($package->can('around'))
|
|
355
|
0 |
0 |
ref $_[0] eq 'HASH' ? :
|
|
384
|
0 |
0 |
if $opt{'newline'}
|
|
388
|
0 |
0 |
if $opt{'verbose'} and not defined $opt{'verbose_in'}
|
|
389
|
0 |
0 |
if $opt{'verbose'} and not defined $opt{'verbose_out'}
|
|
393
|
0 |
0 |
unless @_ > 0 and defined $_[0]
|
|
396
|
0 |
0 |
ref $_ ? :
|
|
|
0 |
0 |
$opt{'list_out'} ? :
|
|
|
0 |
0 |
unless $verbose
|
|
400
|
0 |
0 |
unless $opt{'use_json'}
|
|
403
|
0 |
0 |
unless $opt{'dump_func'}
|
|
424
|
0 |
0 |
$is_odd ? :
|
|
429
|
0 |
0 |
$debug_around_last_nest_level < $nest_level ? :
|
|
430
|
0 |
0 |
$debug_around_last_nest_level > $nest_level ? :
|
|
433
|
0 |
0 |
if $nest_level == 0
|
|
435
|
0 |
0 |
$nest_level > 0 ? :
|
|
444
|
0 |
0 |
if $new_nest
|
|
452
|
0 |
0 |
if ($opt{'list_args'})
|
|
479
|
0 |
0 |
if ($opt{'stack'})
|
|
493
|
0 |
0 |
if length $fn > $max_fn
|
|
514
|
0 |
0 |
if ($opt{'stack'})
|
|
518
|
0 |
0 |
unless ($oneline)
|
|
519
|
0 |
0 |
unless $opt{'stack'}
|
|
538
|
0 |
0 |
if $has_refs and $opt{'verbose_in'}
|
|
556
|
0 |
0 |
if (wantarray) { }
|
|
574
|
0 |
0 |
if ($opt{'list_out'})
|
|
597
|
0 |
0 |
if ($opt{'list_out'})
|
|
607
|
0 |
0 |
if ($opt{'track_stats'})
|
|
620
|
0 |
0 |
exists $stats->{'min'} ? :
|
|
|
0 |
0 |
exists $stats->{'max'} ? :
|
|
623
|
0 |
0 |
if $adj_elapsed < $stats->{'min'}
|
|
624
|
0 |
0 |
if $adj_elapsed > $stats->{'max'}
|
|
629
|
0 |
0 |
if (not $opt{'arg_ignore'}->(@args) || $opt{'return_ignore'}->(@res_copy)) { }
|
|
639
|
0 |
0 |
if $opt{'verbose_out'}
|
|
640
|
0 |
0 |
if $opt{'time'}
|
|
645
|
0 |
0 |
unless $debug_around_last_nest_level == $nest_level
|
|
661
|
0 |
0 |
if ($printed_newlines > 5)
|
|
666
|
0 |
0 |
wantarray ? :
|
|
690
|
0 |
0 |
unless -e $file
|
|
704
|
0 |
0 |
unless scalar @_ == 1
|
|
710
|
0 |
0 |
unless scalar @_ == 1 and ref $_[0] eq ''
|
|
717
|
0 |
2093 |
unless my $js = shift()
|
|
719
|
584 |
1509 |
if ref $js eq 'ARRAY'
|
|
721
|
0 |
1509 |
if &blessed($js) and not $js->can('TO_JSON_RAW')
|
|
724
|
1 |
1508 |
if &blessed($js)
|
|
729
|
727 |
782 |
if scalar @_ > 0
|
|
751
|
0 |
0 |
if ref $text and ref($text)->isa('RapidApp::HTML::RawHtml')
|
|
752
|
0 |
0 |
unless defined $text
|
|
788
|
0 |
0 |
unless defined $msg
|
|
791
|
0 |
0 |
if ref $msg and ref($msg)->isa('RapidApp::Responder::UserError')
|
|
793
|
0 |
0 |
ref $msg && ref($msg)->isa('RapidApp::HTML::RawHtml') ? :
|
|
799
|
0 |
0 |
unless 'RapidApp::Responder::UserError'->can($key)
|
|
806
|
0 |
0 |
if (scalar @_)
|
|
836
|
0 |
0 |
unless defined $msg
|
|
837
|
0 |
0 |
ref $msg && ref($msg)->isa('RapidApp::HTML::RawHtml') ? :
|
|
844
|
0 |
0 |
unless 'RapidApp::Error'->can($key)
|
|
850
|
0 |
0 |
if (scalar @_)
|
|
910
|
0 |
0 |
if @_ == 1
|
|
926
|
0 |
0 |
if scalar(@_) % 2 and not ref $_[0]
|
|
928
|
0 |
0 |
ref $_[0] && ref $_[0] eq 'HASH' ? :
|
|
931
|
0 |
0 |
unless $msg
|
|
933
|
0 |
0 |
unless my $c = 'RapidApp'->active_request_context
|
|
938
|
0 |
0 |
unless $c->is_ra_ajax_req
|
|
961
|
0 |
0 |
if (my $button = $c->req->header('X-RapidApp-CustomPrompt-Button'))
|
|
994
|
0 |
0 |
if $_[0] and $_[0] eq 'RapidApp::Util'
|
|
999
|
0 |
0 |
unless my $class = shift()
|
|
1003
|
0 |
0 |
unless ($path)
|
|
1006
|
0 |
0 |
unless ($INC{$file})
|
|
1007
|
0 |
0 |
if (my $pm_path = Module::Locate::locate($class))
|