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></tr>}) |
46 if ($line =~ m{<tr><td><a href='.*'>.*</a></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 $minors += $3 if ($3); |
50 $minors += $3 if ($3); |
51 $unknowns += $4 if ($4); |
51 $unknowns += $4 if ($4); |