| blib/lib/FAQ/OMatic.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 1 | 200 | 0.5 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 95 | 0 | 0 | 0 | not $isCached and $userGripes ne '' |
| 125 | 0 | 0 | 0 | $cmd eq 'editItem' and $$params{'_insert'} |
| 127 | 0 | 0 | 0 | $cmd eq 'editPart' and $$params{'_insertpart'} |
| 517 | 0 | 0 | 0 | defined $FAQ::OMatic::Config::serverBase and $FAQ::OMatic::Config::serverBase ne '' |
| 525 | 0 | 0 | 0 | defined $FAQ::OMatic::Config::cgiURL and $FAQ::OMatic::Config::cgiURL ne '' |
| 542 | 0 | 0 | 0 | defined $urlRoot and defined $urlPath |
| 588 | 0 | 0 | 0 | $url =~ m[^../(.*)$] and scalar @urlPath > 0 |
| 991 | 0 | 0 | 0 | defined defaultParams()->{$i} and $newParams{$i} eq defaultParams()->{$i} |
| 1010 | 0 | 0 | 0 | not $thisDocIs and $FAQ::OMatic::Config::useServerRelativeRefs || 0 |
| 1098 | 0 | 0 | 0 | $$paramsForMe{'_recurseRoot'} and not defined $$paramsForUrl{'cmd'} |
| 1109 | 0 | 0 | 0 | $FAQ::OMatic::Config::cacheDir and not grep({not /^file$/;} keys %{$paramsForUrl;}) |
| 1179 | 0 | 0 | 0 | $FAQ::OMatic::Config::showEditIcons and $image ne '' |
| 1286 | 0 | 0 | 0 | $useHint and open HINT, "<$FAQ::OMatic::Config::metaDir/biggestFileHint" |
| 1300 | 0 | 0 | 0 | $useHint and open HINT, ">$FAQ::OMatic::Config::metaDir/biggestFileHint" |
| 1462 | 0 | 0 | 0 | $num >= 11 && $num <= 19 |
| 1505 | 0 | 0 | 0 | $count < 5 and $! =~ /No more process/ |
| 1562 | 0 | 0 | 0 | $exitstatus == 0 and not $alwaysWantReply |
| 1693 | 0 | 0 | 0 | defined $p[0] and substr($p[0], 0, 1) eq '-' |
| line | l | !l | condition |
|---|---|---|---|
| 90 | 0 | 0 | shift() || [] |
| 91 | 0 | 0 | shift() || '' |
| 94 | 0 | 0 | getLocal('userGripes') || '' |
| 130 | 0 | 0 | $$params{'file'} || '1' |
| 131 | 0 | 0 | $$params{'file'} || '1' |
| 150 | 0 | 0 | $$pageDescs{$cmd} || '' |
| 171 | 0 | 0 | $$params{'cmd'} || 'faq' |
| 227 | 0 | 0 | shift() || 'problem' |
| 229 | 0 | 0 | shift() || {} |
| 231 | 0 | 0 | $$options{'stack'} || '' |
| 232 | 0 | 0 | $$options{'noentify'} || '' |
| 236 | 0 | 0 | $FAQ::OMatic::Auth::trustedID || $$FAQ::OMatic::theParams{'id'} || '(noID)' |
| 283 | 0 | 0 | $ENV{'HTTP_USER_AGENT'} || 'undefined' |
| 368 | 0 | 0 | getLocal('userGripes') || '' |
| 432 | 0 | 0 | $$params{'render'} || '' |
| 442 | 0 | 0 | shift() || '-small' |
| 495 | 0 | 0 | $$bagDesc{'SizeBytes'} || '' |
| 599 | 0 | 0 | shift() || {} |
| 600 | 0 | 0 | shift() || '' |
| 601 | 0 | 0 | shift() || '' |
| 607 | 0 | 0 | $FAQ::OMatic::Config::antiSpam || 'off' |
| 649 | 0 | 0 | shift() || 0 |
| 650 | 0 | 0 | shift() || 0 |
| 702 | 0 | 0 | $arg || '' |
| 703 | 0 | 0 | $arg || '' |
| 808 | 0 | 0 | shift() || 0 |
| 809 | 0 | 0 | shift() || 0 |
| 869 | 0 | 0 | $FAQ::OMatic::Config::renderDefault || 'tables' |
| 0 | 0 | $FAQ::OMatic::Config::editCmdsDefault || 'hide' | |
| 0 | 0 | $FAQ::OMatic::Config::showModeratorDefault || 'hide' | |
| 0 | 0 | $FAQ::OMatic::Config::showLastModifiedDefault || 'hide' | |
| 0 | 0 | $FAQ::OMatic::Config::showAttributionsDefault || 'default' | |
| 0 | 0 | $FAQ::OMatic::Config::textCmdsDefault || 'hide' | |
| 941 | 0 | 0 | shift() || {} |
| 943 | 0 | 0 | shift() || '' |
| 948 | 0 | 0 | shift() || '' |
| 952 | 0 | 0 | shift() || '' |
| 1010 | 0 | 0 | $FAQ::OMatic::Config::useServerRelativeRefs || 0 |
| 1100 | 0 | 0 | $$paramsForUrl{'file'} || '1' |
| 1137 | 0 | 0 | shift() || '' |
| 1175 | 0 | 0 | shift() || '' |
| 1176 | 0 | 0 | shift() || {} |
| 1181 | 0 | 0 | $FAQ::OMatic::Config::showEditIcons || '' |
| 1272 | 0 | 0 | shift() || 1 |
| 1354 | 0 | 0 | validEmail($to) || '' |
| 1491 | 0 | 0 | shift() || 0 |
| 1670 | 0 | 0 | shift() || die('no argument to redirect') |
| 1671 | 0 | 0 | shift() || '' |
| 1760 | 0 | 0 | $FAQ::OMatic::Config::useDBMSearch || '' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 80 | 0 | 0 | 0 | shift() || $FAQ::OMatic::theParams |
| 170 | 0 | 0 | 0 | shift() || $FAQ::OMatic::theParams |
| 228 | 0 | 0 | 0 | shift() || '[gripe with no msg: ' . join(':', caller()) . ']' |
| 239 | 0 | 0 | 0 | $severity eq 'problem' or $severity eq 'abort' |
| 365 | 0 | 0 | 0 | $severity eq 'error' or $severity eq 'panic' |
| 0 | 0 | 0 | $severity eq 'error' or $severity eq 'panic' or $severity eq 'abort' | |
| 706 | 0 | 0 | 0 | $prefix eq 'http' or $prefix eq 'https' |
| 0 | 0 | 0 | $prefix eq 'ftp' or $prefix eq 'gopher' | |
| 0 | 0 | 0 | $prefix eq 'ftp' or $prefix eq 'gopher' or $prefix eq 'telnet' | |
| 0 | 0 | 0 | $prefix eq 'ftp' or $prefix eq 'gopher' or $prefix eq 'telnet' or $prefix eq 'news' | |
| 980 | 0 | 0 | 0 | not defined $$changedParams{$i} or $$changedParams{$i} eq '' |
| 1030 | 0 | 0 | 0 | $refType eq 'POST' or $refType eq 'GET' |
| 1046 | 0 | 0 | 0 | $refType eq 'POST' or $refType eq 'GET' |
| 1071 | 0 | 0 | 0 | getCacheUrl(\%newParams, $params) || $url |
| 1195 | 0 | 0 | 0 | shift() || $FAQ::OMatic::Config::itemDir |
| 1624 | 0 | 0 | 1 | exists $ENV{'GATEWAY_INTERFACE'} && $ENV{'GATEWAY_INTERFACE'} =~ /CGI-Perl/ || exists $ENV{'MOD_PERL'} |