blib/lib/CGI/Ex/Dump.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 0 | 22 | 0.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
39 | 0 | 0 | 0 | $CGI::Ex::Dump::DEPARSE && eval { do { require B::Deparse } } |
81 | 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 |
line | l | !l | condition |
---|---|---|---|
62 | 0 | 0 | $CGI::Ex::Dump::CALL_LEVEL || 0 |
143 | 0 | 0 | shift() || 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
81 | 0 | 0 | 0 | $line =~ s/ \s* \b if \b .* \n? $ //x || $line =~ s/ \s* ; \s* $ //x || $line =~ s/ \s+ $ //x |
92 | 0 | 0 | 0 | $called eq "dex_text" or $called eq "dex_warn" |
0 | 0 | 0 | $called eq "dex_text" or $called eq "dex_warn" or not $ENV{'REQUEST_METHOD'} |