blib/lib/Data/Debug.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 27 | 0.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
59 | 0 | 0 | 0 | $DEPARSE && eval { do { require B::Deparse } } |
65 | 0 | 0 | 0 | UNIVERSAL::isa($_, 'HASH') and $ref = $$_{'dbh_cache'} |
112 | 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 | |
123 | 0 | 0 | 0 | $called eq 'debug' and $ENV{'REQUEST_METHOD'} |
line | l | !l | condition |
---|---|---|---|
99 | 0 | 0 | $line ||= '' |
208 | 0 | 0 | shift() || 0 |
209 | 0 | 0 | shift() || {} |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
112 | 0 | 0 | 0 | $line =~ s/ \s* \b if \b .* \n? $ //x || $line =~ s/ \s* ; \s* $ //x || $line =~ s/ \s+ $ //x |
123 | 0 | 0 | 0 | $called eq 'debug_html' or $called eq 'debug' and $ENV{'REQUEST_METHOD'} |