blib/lib/Data/Debug.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 27 | 0.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
55 | 0 | 0 | 0 | $DEPARSE && eval { do { require B::Deparse } } |
61 | 0 | 0 | 0 | UNIVERSAL::isa($_, 'HASH') and $ref = $_->{'dbh_cache'} |
108 | 0 | 0 | 0 | $line =~ s/^ .*\b \Q$called\E ( \s* \( \s* | \s+ )//x and $hold = $1 |
0 | 0 | 0 | $line =~ s/^ .*\b \Q$called\E ( \s* \( \s* | \s+ )//x and $hold = $1 and $line =~ s/ \s* \b if \b .* \n? $ //x || $line =~ s/ \s* ; \s* $ //x || $line =~ s/ \s+ $ //x | |
119 | 0 | 0 | 0 | $called eq 'debug' and $ENV{'REQUEST_METHOD'} |
line | l | !l | condition |
---|---|---|---|
95 | 0 | 0 | $line ||= '' |
205 | 0 | 0 | shift() || 0 |
206 | 0 | 0 | shift() || {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
108 | 0 | 0 | 0 | $line =~ s/ \s* \b if \b .* \n? $ //x || $line =~ s/ \s* ; \s* $ //x || $line =~ s/ \s+ $ //x |
119 | 0 | 0 | 0 | $called eq 'debug_html' or $called eq 'debug' and $ENV{'REQUEST_METHOD'} |