equal
deleted
inserted
replaced
41 # READ INDEX.HTML FILE |
41 # READ INDEX.HTML FILE |
42 if (open(INDEX, $raptorSummary)) |
42 if (open(INDEX, $raptorSummary)) |
43 { |
43 { |
44 while (my $line = <INDEX>) |
44 while (my $line = <INDEX>) |
45 { |
45 { |
46 if ($line =~ m{<tr><td><a href='.*'>.*</a></td><td>(\d+)</td><td>(\d+)</td><td>(\d+)</td><td>(\d+)</td>}) |
46 if ($line =~ m{<tr><td><a href='.*'>.*</a></td><td>(\d+)</td><td>(\d+)</td><td>(\d+)</td><td>(\d+)</td>(<td>(\d+)</td>)?}) |
47 { |
47 { |
48 $criticals += $1 if ($1); |
48 $criticals += $1 if ($1); |
49 $majors += $2 if ($2); |
49 $majors += $2 if ($2); |
|
50 $majors += $6 if ($6); # add number of missing files to majors |
50 $minors += $3 if ($3); |
51 $minors += $3 if ($3); |
51 $unknowns += $4 if ($4); |
52 $unknowns += $4 if ($4); |
52 } |
53 } |
53 } |
54 } |
54 close(INDEX); |
55 close(INDEX); |