| line |
true |
false |
branch |
|
113
|
0 |
0 |
unless defined $hash{'parent'} |
|
195
|
0 |
0 |
if ($THATMONTH < 0) |
|
206
|
0 |
0 |
if ($THATMONTH < 0) |
|
262
|
0 |
0 |
if ($$self{'perls'}) |
|
284
|
0 |
0 |
if ($testers) |
|
392
|
0 |
0 |
if ($lastid) { } |
|
401
|
0 |
0 |
if $$self{'dists'}{$$row{'dist'}} and $$self{'dists'}{$$row{'dist'}}{'VER'} eq $$row{'version'} |
|
427
|
0 |
0 |
if $month =~ /^\d+$/ and $month > $$self{'dates'}{'THATMONTH'} |
|
441
|
0 |
0 |
if ($file and -f $file) |
|
442
|
0 |
0 |
if (my $fh = 'IO::File'->new($file, 'r')) |
|
445
|
0 |
0 |
unless $d |
|
456
|
0 |
0 |
unless $$self{'build'}{$d}{'old'} |
|
467
|
0 |
0 |
if $$row{'postdate'} <= $$self{'dates'}{'THATMONTH'} |
|
491
|
0 |
0 |
if (defined $$self{'dists'}{$$row{'dist'}}) |
|
494
|
0 |
0 |
if ($$self{'dists'}{$$row{'dist'}}{'VER'} eq $$row{'version'}) |
|
498
|
0 |
0 |
if $$row{'state'} eq 'fail' |
|
499
|
0 |
0 |
if $$row{'state'} eq 'pass' |
|
514
|
0 |
0 |
if ($$row{'postdate'} > $$self{'dates'}{'THATMONTH'}) |
|
527
|
0 |
0 |
if defined $$self{'build'}{$day} |
|
537
|
0 |
0 |
if $$self{'count'}{$type} % 10000 == 0 |
|
539
|
0 |
0 |
if ($$self{'count'}{$type} % 100000 == 0) |
|
547
|
0 |
0 |
if ($$self{'count'}{$type} == 1 or $$self{'count'}{$type} % 500000 == 0) { } |
|
575
|
0 |
0 |
if ($type) |
|
577
|
0 |
0 |
unless -f $storage |
|
586
|
0 |
0 |
unless -f $storage |
|
596
|
0 |
0 |
if ($type) |
|
597
|
0 |
0 |
unless $store |
|
602
|
0 |
0 |
if $dir and not -e $dir |
|
609
|
0 |
0 |
unless $$self{$type} |
|
614
|
0 |
0 |
if $dir and not -e $dir |
|
667
|
0 |
0 |
if (-f $source) { } |
|
669
|
0 |
0 |
if -f $target |
|
672
|
0 |
0 |
if (-d dirname($target)) { } |
|
692
|
0 |
0 |
if -f $target |
|
693
|
0 |
0 |
if (-f $source) { } |
|
725
|
0 |
0 |
$rows[0][0] ? : |
|
727
|
0 |
0 |
$rows[0][0] ? : |
|
729
|
0 |
0 |
if $$self{'rates'}{'report'} < 1000 |
|
730
|
0 |
0 |
if $$self{'rates'}{'distro'} < 1000 |
|
762
|
0 |
0 |
unless $$self{'dists'}{$b}{'ALL'} <=> $$self{'dists'}{$a}{'ALL'} |
|
764
|
0 |
0 |
if --$inx <= 0 |
|
767
|
0 |
0 |
unless $$self{'dists'}{$b}{'IXL'} <=> $$self{'dists'}{$a}{'IXL'} |
|
769
|
0 |
0 |
if --$inx <= 0 |
|
777
|
0 |
0 |
$$self{'xlast'} ? : |
|
783
|
0 |
0 |
if $row[3] |
|
784
|
0 |
0 |
if $row[5] and $row[5] =~ /\@/ |
|
811
|
0 |
0 |
if $$row{'dist'} eq 'perl' |
|
817
|
0 |
0 |
if $authors{$$row{'author'}}{'dist'}{$$row{'dist'}} == 1 |
|
822
|
0 |
0 |
if $authors{$$row{'author'}}{'count'} == 1 |
|
823
|
0 |
0 |
if $distros{$$row{'dist'}}{'count'} == 1 |
|
828
|
0 |
0 |
unless my $stat6 = 'IO::File'->new("$results/stats6.txt", 'w+') |
|
830
|
0 |
0 |
unless my $stat12 = 'IO::File'->new("$results/stats12.txt", 'w+') |
|
870
|
0 |
0 |
if $inx > 20 |
|
874
|
0 |
0 |
unless $authors{$b}{'dists'} <=> $authors{$a}{'dists'} |
|
876
|
0 |
0 |
if $inx > 20 |
|
880
|
0 |
0 |
unless $authors{$b}{'count'} <=> $authors{$a}{'count'} |
|
882
|
0 |
0 |
if $inx > 20 |
|
886
|
0 |
0 |
unless $distros{$b}{'count'} <=> $distros{$a}{'count'} |
|
888
|
0 |
0 |
if $inx > 20 |
|
929
|
0 |
0 |
if ($stats{'vcounter'} % 10000 == 0) |
|
942
|
0 |
0 |
unless ($pause{$$row{'author'}}) |
|
945
|
0 |
0 |
if ($stats{'pcounter'} % 1000 == 0) |
|
959
|
0 |
0 |
if $dists{$$row{'dist'}} |
|
963
|
0 |
0 |
if ($stats{'dcounter'} % 5000 == 0) |
|
987
|
0 |
0 |
if @list |
|
1032
|
0 |
0 |
if $year == $start_year and $month < $start_month |
|
1037
|
0 |
0 |
if $thismon > 'DateTime'->now |
|
1046
|
0 |
0 |
if $seen{$$row{'dist'}} |
|
1068
|
0 |
0 |
unless $allversions{$b} <=> $allversions{$a} |
|
1074
|
0 |
0 |
unless $newversions{$b} <=> $newversions{$a} |
|
1093
|
0 |
0 |
unless $$row{'reldate'} and $$row{'reldate'} =~ /^(\d+)\-(\d+)\-(\d+).(\d+):(\d+):(\d+)/ |
|
1104
|
0 |
0 |
if ($year != $now->year) { } |
|
|
0 |
0 |
elsif ($date->week_number != $now->week_number) { } |
|
1111
|
0 |
0 |
if ($year != $now->year or $year == $now->year and $month != $now->month) |
|
1116
|
0 |
0 |
if ($year != $now->year or $year == $now->year and $month != $now->month or $year == $now->year and $month == $now->month and $day != $now->day) |
|
1184
|
0 |
0 |
if $noreports and $$row{'dist'} =~ /^$noreports$/ |
|
1185
|
0 |
0 |
if $dists{$$row{'dist'}} |
|
1186
|
0 |
0 |
if $$row{'released'} >= $grace |
|
1223
|
0 |
0 |
if $noreports and $$row{'dist'} =~ /^$noreports$/ |
|
1224
|
0 |
0 |
if $dists{$$row{'dist'}} |
|
1227
|
0 |
0 |
if $$row{'count'} > 0 |
|
1228
|
0 |
0 |
if not $$row{'oncpan'} or $$row{'oncpan'} != 1 |
|
1229
|
0 |
0 |
if $$row{'released'} > $grace |
|
1272
|
0 |
0 |
unless -f $missing |
|
1273
|
0 |
0 |
unless my $fh = 'IO::File'->new($missing) |
|
1277
|
0 |
0 |
unless $pauseid |
|
1289
|
0 |
0 |
if @missing |
|
1345
|
0 |
0 |
unless my $vers = shift() |
|
1348
|
0 |
0 |
unless @$vers |
|
1352
|
0 |
0 |
if ($type eq 'month') |
|
1354
|
0 |
0 |
if defined $$self{'osys'}{$osname}{$perl}{'month'}{$$self{'dates'}{'LASTMONTH'}} |
|
1355
|
0 |
0 |
if $check == 0 |
|
1361
|
0 |
0 |
$type eq 'month' ? : |
|
|
0 |
0 |
defined $$self{'osys'}{$osname}{$perl}{$type} ? : |
|
1370
|
0 |
0 |
unless $totals{'perl'}{$_} |
|
1382
|
0 |
0 |
unless $totals{'os'}{$b} <=> $totals{'os'}{$a} |
|
1383
|
0 |
0 |
if ($type eq 'month') |
|
1385
|
0 |
0 |
if defined $$self{'osys'}{$osname}{$perl}{'month'}{$$self{'dates'}{'LASTMONTH'}} |
|
1386
|
0 |
0 |
if $check == 0 |
|
1393
|
0 |
0 |
$type eq 'month' ? : |
|
|
0 |
0 |
defined $$self{'osys'}{$osname}{$perl}{$type} ? : |
|
1396
|
0 |
0 |
if ($count) |
|
1397
|
0 |
0 |
if ($$self{'list'}{'osname'}{$osname}{$perl}{$type}) { } |
|
1400
|
0 |
0 |
$type eq 'month' ? : |
|
1415
|
0 |
0 |
$type eq 'month' ? : |
|
1418
|
0 |
0 |
if $number > 0 |
|
1419
|
0 |
0 |
if $number > $matrix_limits{$type}[0] |
|
1420
|
0 |
0 |
if $number > $matrix_limits{$type}[1] |
|
1424
|
0 |
0 |
$count ? : |
|
1433
|
0 |
0 |
unless $totals{'perl'}{$_} |
|
1499
|
0 |
0 |
unless my $vers = shift() |
|
1502
|
0 |
0 |
unless @$vers |
|
1506
|
0 |
0 |
if ($type eq 'month') |
|
1508
|
0 |
0 |
if defined $$self{'pass'}{$platform}{$perl}{'month'}{$$self{'dates'}{'LASTMONTH'}} |
|
1509
|
0 |
0 |
if $check == 0 |
|
1515
|
0 |
0 |
$type eq 'month' ? : |
|
|
0 |
0 |
defined $$self{'pass'}{$platform}{$perl}{$type} ? : |
|
1524
|
0 |
0 |
unless $totals{'perl'}{$_} |
|
1536
|
0 |
0 |
unless $totals{'platform'}{$b} <=> $totals{'platform'}{$a} |
|
1537
|
0 |
0 |
if ($type eq 'month') |
|
1539
|
0 |
0 |
if defined $$self{'pass'}{$platform}{$perl}{'month'}{$$self{'dates'}{'LASTMONTH'}} |
|
1540
|
0 |
0 |
if $check == 0 |
|
1547
|
0 |
0 |
$type eq 'month' ? : |
|
|
0 |
0 |
defined $$self{'pass'}{$platform}{$perl}{$type} ? : |
|
1550
|
0 |
0 |
if ($count) |
|
1551
|
0 |
0 |
if ($$self{'list'}{'platform'}{$platform}{$perl}{$type}) { } |
|
1554
|
0 |
0 |
$type eq 'month' ? : |
|
1569
|
0 |
0 |
$type eq 'month' ? : |
|
1572
|
0 |
0 |
if $number > 0 |
|
1573
|
0 |
0 |
if $number > $matrix_limits{$type}[0] |
|
1574
|
0 |
0 |
if $number > $matrix_limits{$type}[1] |
|
1578
|
0 |
0 |
$count ? : |
|
1586
|
0 |
0 |
unless $totals{'perl'}{$_} |
|
1629
|
0 |
0 |
if ($json) |
|
1632
|
0 |
0 |
if $date > $last |
|
1640
|
0 |
0 |
if $last |
|
1647
|
0 |
0 |
if $type eq 'osname' |
|
1674
|
0 |
0 |
if ($json) |
|
1677
|
0 |
0 |
if $date > $last |
|
1685
|
0 |
0 |
if $last |
|
1701
|
0 |
0 |
unless $stats{$date}{'list'}{$b} <=> $stats{$date}{'list'}{$a} |
|
1747
|
0 |
0 |
if ($dates{$post}) { } |
|
1749
|
0 |
0 |
unless $os |
|
1757
|
0 |
0 |
unless $os |
|
1793
|
0 |
0 |
unless $osname |
|
1796
|
0 |
0 |
unless ($hash{$osname}{$b}{$type} || 0) <=> ($hash{$osname}{$a}{$type} || 0) |
|
1813
|
0 |
0 |
$type eq 'this' ? : |
|
1814
|
0 |
0 |
$type eq 'that' ? : |
|
1815
|
0 |
0 |
$type eq 'all' ? : |
|
1828
|
0 |
0 |
unless $os |
|
1836
|
0 |
0 |
unless $testers{$b} <=> $testers{$a} |
|
1883
|
0 |
0 |
if $date > $$self{'dates'}{'THISMONTH'} |
|
1895
|
0 |
0 |
$reports > 0 ? : |
|
|
0 |
0 |
$reports > 0 ? : |
|
|
0 |
0 |
$reports > 0 ? : |
|
1908
|
0 |
0 |
if $date > $$self{'dates'}{'THISMONTH'} - 1 |
|
1936
|
0 |
0 |
if $date > $$self{'dates'}{'THISMONTH'} - 1 |
|
1952
|
0 |
0 |
if $date > $$self{'dates'}{'THISMONTH'} - 1 |
|
1954
|
0 |
0 |
if (defined $$self{'counts'}{$date}) |
|
1960
|
0 |
0 |
if $date > $$self{'dates'}{'LASTMONTH'} |
|
1991
|
0 |
0 |
unless $dists{$dist} |
|
1996
|
0 |
0 |
$$self{'fails'}{$dist}{$version}{'fail'} ? : |
|
2011
|
0 |
0 |
unless $worst{$b}{'fail'} <=> $worst{$a}{'fail'} |
|
2012
|
0 |
0 |
unless $worst{$dist}{'fail'} |
|
2015
|
0 |
0 |
if $count > 100 |
|
2025
|
0 |
0 |
unless $worst{$b}{'pcent'} <=> $worst{$a}{'pcent'} |
|
2026
|
0 |
0 |
unless $worst{$dist}{'fail'} |
|
2029
|
0 |
0 |
if $count > 100 |
|
2043
|
0 |
0 |
if $worst{$dist}{'post'} ge $recent |
|
2049
|
0 |
0 |
unless $worst{$b}{'fail'} <=> $worst{$a}{'fail'} |
|
2050
|
0 |
0 |
unless $worst{$dist}{'fail'} |
|
2053
|
0 |
0 |
if $count > 100 |
|
2063
|
0 |
0 |
unless $worst{$b}{'pcent'} <=> $worst{$a}{'pcent'} |
|
2064
|
0 |
0 |
unless $worst{$dist}{'fail'} |
|
2067
|
0 |
0 |
if $count > 100 |
|
2087
|
0 |
0 |
if $$self{'build'}{$date}{'old'} == 2 |
|
2107
|
0 |
0 |
if $res |
|
2156
|
0 |
0 |
unless $parser->process($layout, $vars, $target) |
|
2164
|
0 |
0 |
if $num == 1 or $num == 21 or $num == 31 |
|
2165
|
0 |
0 |
if $num == 2 or $num == 22 |
|
2166
|
0 |
0 |
if $num == 3 or $num == 23 |
|
2181
|
0 |
0 |
unless my $fh = 'IO::File'->new($mailrc, 'r') |
|
2183
|
0 |
0 |
unless /^alias\s*(\w+)\s+"([\s\w]+)\s+<[^>]+>"/ |