| line |
true |
false |
branch |
|
95
|
0 |
0 |
if (not $isCached and $userGripes ne '') |
|
107
|
0 |
0 |
unless ($title) |
|
108
|
0 |
0 |
if (FAQ::OMatic::Versions::getVersion('Items')) |
|
125
|
0 |
0 |
if $cmd eq 'editItem' and $$params{'_insert'} |
|
127
|
0 |
0 |
if $cmd eq 'editPart' and $$params{'_insertpart'} |
|
151
|
0 |
0 |
if ($cmd eq 'faq') { } |
|
|
0 |
0 |
elsif ($pd) { } |
|
152
|
0 |
0 |
$file eq '1' ? : |
|
159
|
0 |
0 |
$rt ? : |
|
189
|
0 |
0 |
unless @a |
|
192
|
0 |
0 |
unless (defined $subroutine) |
|
239
|
0 |
0 |
if ($severity eq 'panic') { } |
|
|
0 |
0 |
elsif ($severity eq 'problem' or $severity eq 'abort') { } |
|
247
|
0 |
0 |
if ($is_show_stack_backtrace) |
|
251
|
0 |
0 |
if ($mailguys ne '') |
|
260
|
0 |
0 |
if ($is_show_stack_backtrace) |
|
263
|
0 |
0 |
if (@stack_backtrace) { } |
|
291
|
0 |
0 |
if ($severity ne 'note') |
|
298
|
0 |
0 |
$noentify ? : |
|
301
|
0 |
0 |
if ($is_show_stack_backtrace) |
|
304
|
0 |
0 |
if (@stack_backtrace) { } |
|
334
|
0 |
0 |
if ($is_show_stack_backtrace) |
|
337
|
0 |
0 |
if (@stack_backtrace) { } |
|
342
|
0 |
0 |
if ($i != 0) |
|
365
|
0 |
0 |
if ($severity eq 'error' or $severity eq 'panic' or $severity eq 'abort') |
|
366
|
0 |
0 |
if (getParam($FAQ::OMatic::theParams, 'isapi')) { } |
|
405
|
0 |
0 |
if (++$retries >= 10) |
|
408
|
0 |
0 |
if (sysopen LOCK, $lockname, 65, 292) |
|
421
|
0 |
0 |
if (-e $lockname) |
|
432
|
0 |
0 |
if (($$params{'render'} || '') eq 'text') { } |
|
469
|
0 |
0 |
unless (-f $FAQ::OMatic::Config::bagsDir . $filename) |
|
474
|
0 |
0 |
if $sw ne '' |
|
476
|
0 |
0 |
if $sh ne '' |
|
489
|
0 |
0 |
unless (-f $FAQ::OMatic::Config::bagsDir . $filename) |
|
496
|
0 |
0 |
if ($size ne '') |
|
517
|
0 |
0 |
if (defined $FAQ::OMatic::Config::serverBase and $FAQ::OMatic::Config::serverBase ne '') |
|
525
|
0 |
0 |
if (defined $FAQ::OMatic::Config::cgiURL and $FAQ::OMatic::Config::cgiURL ne '') |
|
535
|
0 |
0 |
if (defined getLocal('hapCache')) |
|
542
|
0 |
0 |
unless (defined $urlRoot and defined $urlPath) |
|
543
|
0 |
0 |
unless ($cgi->protocol =~ /^http/i) |
|
577
|
0 |
0 |
if ($url =~ m[^/]) |
|
609
|
0 |
0 |
if ($how eq 'cheesy') { } |
|
|
0 |
0 |
elsif ($how eq 'nameonly') { } |
|
|
0 |
0 |
elsif ($how eq 'hide') { } |
|
623
|
0 |
0 |
if ($isText) |
|
627
|
0 |
0 |
if ($how eq 'off') |
|
630
|
0 |
0 |
if ($wantarray) { } |
|
636
|
0 |
0 |
if ($target ne '') { } |
|
652
|
0 |
0 |
if (not $ishtml) { } |
|
665
|
0 |
0 |
if ($i & 1) { } |
|
698
|
0 |
0 |
$isdirectory ? : |
|
706
|
0 |
0 |
if (not defined $prefix) { } |
|
|
0 |
0 |
elsif ($prefix eq 'http' or $prefix eq 'https') { } |
|
|
0 |
0 |
elsif ($prefix eq 'ftp' or $prefix eq 'gopher' or $prefix eq 'telnet' or $prefix eq 'news') { } |
|
|
0 |
0 |
elsif ($prefix eq 'mailto') { } |
|
|
0 |
0 |
elsif ($prefix eq 'faqomatic') { } |
|
|
0 |
0 |
elsif ($prefix eq 'baginline') { } |
|
|
0 |
0 |
elsif ($prefix eq 'baglink') { } |
|
718
|
0 |
0 |
if ($rest =~ m[^//]) { } |
|
758
|
0 |
0 |
if (defined $prefix) { } |
|
759
|
0 |
0 |
if ($target ne '') { } |
|
786
|
0 |
0 |
unless ($ishtml) |
|
830
|
0 |
0 |
unless (defined $_[0]) |
|
843
|
0 |
0 |
unless $dontLog |
|
868
|
0 |
0 |
unless (defined $defaultParams) |
|
892
|
0 |
0 |
unless (ref $params) |
|
893
|
0 |
0 |
if defined $$params{$key} |
|
894
|
0 |
0 |
if defined defaultParams()->{$key} |
|
910
|
0 |
0 |
if ($_[0] =~ /^\-/) { } |
|
914
|
0 |
0 |
if ($argName =~ /\-command$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-changedParams$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-refType$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-saveTransients$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-blastAll$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-params$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-target$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-thisDocIs$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-urlBase$/i) { } |
|
|
0 |
0 |
elsif ($argName =~ /\-multipart$/i) { } |
|
936
|
0 |
0 |
if (scalar @_) |
|
955
|
0 |
0 |
if defined $_[0] |
|
961
|
0 |
0 |
if ($blastAll) { } |
|
970
|
0 |
0 |
unless ($saveTransients) |
|
973
|
0 |
0 |
if $i =~ /^_/ |
|
980
|
0 |
0 |
if (not defined $$changedParams{$i} or $$changedParams{$i} eq '') { } |
|
991
|
0 |
0 |
if (defined defaultParams()->{$i} and $newParams{$i} eq defaultParams()->{$i}) |
|
1010
|
0 |
0 |
if ($urlBase ne '') { } |
|
|
0 |
0 |
elsif (not $thisDocIs and $FAQ::OMatic::Config::useServerRelativeRefs || 0) { } |
|
1028
|
0 |
0 |
unless (defined $value) |
|
1030
|
0 |
0 |
if ($refType eq 'POST' or $refType eq 'GET') { } |
|
1046
|
0 |
0 |
if ($refType eq 'POST' or $refType eq 'GET') |
|
1048
|
0 |
0 |
if ($refType eq 'POST') |
|
1049
|
0 |
0 |
if ($multipart) |
|
1065
|
0 |
0 |
unless ($thisDocIs) |
|
1074
|
0 |
0 |
if ($refType eq 'url') { } |
|
1077
|
0 |
0 |
$target ? : |
|
1098
|
0 |
0 |
if ($$paramsForMe{'_recurseRoot'} and not defined $$paramsForUrl{'cmd'}) |
|
1104
|
0 |
0 |
if ($linkItem->hasParent($$paramsForMe{'_recurseRoot'})) |
|
1109
|
0 |
0 |
if ($FAQ::OMatic::Config::cacheDir and not grep({not /^file$/;} keys %{$paramsForUrl;})) |
|
1112
|
0 |
0 |
if ($$paramsForMe{'_fromCache'}) { } |
|
1138
|
0 |
0 |
if ($file =~ /[^a-zA-Z0-9\.\-\_]/s) |
|
1150
|
0 |
0 |
if ($$params{'_fromCache'}) { } |
|
|
0 |
0 |
elsif (not defined $FAQ::OMatic::Config::bagsURL) { } |
|
1179
|
0 |
0 |
if ($FAQ::OMatic::Config::showEditIcons and $image ne '') { } |
|
1181
|
0 |
0 |
if (($FAQ::OMatic::Config::showEditIcons || '') eq 'icons-only') { } |
|
|
0 |
0 |
elsif ($label ne '') { } |
|
1199
|
0 |
0 |
unless opendir DATADIR, $dir |
|
1202
|
0 |
0 |
if /^\./ |
|
1203
|
0 |
0 |
unless -f $dir . '/' . $_ |
|
1229
|
0 |
0 |
if ($$params{'_highlightWords'}) { } |
|
|
0 |
0 |
elsif ($$params{'_searchArray'}) { } |
|
1234
|
0 |
0 |
if (@hw) |
|
1257
|
0 |
0 |
if $i + 1 < @pieces |
|
1258
|
0 |
0 |
if $i + 4 < @pieces |
|
1279
|
0 |
0 |
if ($filename eq 'trash') |
|
1286
|
0 |
0 |
if ($useHint and open HINT, "<$FAQ::OMatic::Config::metaDir/biggestFileHint") |
|
1289
|
0 |
0 |
if $filename < 1 |
|
1291
|
0 |
0 |
unless (-e "$FAQ::OMatic::Config::itemDir/$filename") |
|
1300
|
0 |
0 |
if ($useHint and open HINT, ">$FAQ::OMatic::Config::metaDir/biggestFileHint") |
|
1309
|
0 |
0 |
unless defined $ENV{'QUERY_STRING'} |
|
1319
|
0 |
0 |
unless $binpath |
|
1328
|
0 |
0 |
$cnt == 1 ? : |
|
1338
|
0 |
0 |
if ($encode_lang eq 'ja_JP.EUC') { } |
|
|
0 |
0 |
elsif ($encode_lang ne 'en') { } |
|
1348
|
0 |
0 |
unless $FAQ::OMatic::Config::mailCommand |
|
1351
|
0 |
0 |
if (ref $to) { } |
|
1352
|
0 |
0 |
unless validEmail($_) |
|
1356
|
0 |
0 |
if $to =~ /^\s*$/ |
|
1374
|
0 |
0 |
if ($FAQ::OMatic::Config::mailCommand =~ /sendmail/) { } |
|
1377
|
0 |
0 |
unless (open MAILX, "|$FAQ::OMatic::Config::mailCommand $to 2>&1 " . ">>$FAQ::OMatic::Config::metaDir/errors") |
|
1392
|
0 |
0 |
unless (open MAILX, "|$FAQ::OMatic::Config::mailCommand -s '${subj}' $to") |
|
1411
|
0 |
0 |
unless opendir GLOBDIR, $dir |
|
1462
|
0 |
0 |
$num >= 11 && $num <= 19 ? : |
|
1474
|
0 |
0 |
if ($num > 524288) { } |
|
|
0 |
0 |
elsif ($num > 512) { } |
|
1501
|
0 |
0 |
unless pipe READPIPE, WRITEPIPE |
|
1505
|
0 |
0 |
if ($pid = fork) { } |
|
|
0 |
0 |
elsif (defined $pid) { } |
|
|
0 |
0 |
elsif ($count < 5 and $! =~ /No more process/) { } |
|
1562
|
0 |
0 |
if ($exitstatus == 0 and not $alwaysWantReply) { } |
|
1572
|
0 |
0 |
$html ? : |
|
1588
|
0 |
0 |
if ($FAQ::OMatic::Config::mirrorURL) |
|
1604
|
0 |
0 |
if ($render ne 'text') { } |
|
1611
|
0 |
0 |
if ($render ne 'text') { } |
|
1624
|
0 |
1 |
exists $ENV{'GATEWAY_INTERFACE'} && $ENV{'GATEWAY_INTERFACE'} =~ /CGI-Perl/ || exists $ENV{'MOD_PERL'} ? : |
|
1632
|
0 |
0 |
if ($FAQ::OMatic::USE_MOD_PERL) { } |
|
1680
|
0 |
0 |
if ($asString) { } |
|
1693
|
0 |
0 |
if (defined $p[0] and substr($p[0], 0, 1) eq '-') { } |
|
1703
|
0 |
0 |
unless (defined $v) |
|
1707
|
0 |
0 |
if (exists $posh{$k}) { } |
|
1735
|
0 |
0 |
if ($name =~ /^([A-Za-z0-9\_\-\.]+)$/) { } |
|
1745
|
0 |
0 |
if ($filename eq '') |
|
1749
|
0 |
0 |
unless open CATFILE, "<$FAQ::OMatic::Config::metaDir/$filename" |
|
1771
|
0 |
0 |
if ($load > 4) |
|
1781
|
0 |
0 |
unless (defined $str) |
|
1784
|
0 |
0 |
unless ($str =~ /^([\d\-]+)/) |