equal
deleted
inserted
replaced
246 my $allconfigsstring = ''; |
246 my $allconfigsstring = ''; |
247 for my $raptorconfig (sort {$a cmp $b} keys %{$allconfigs}) { $allconfigsstring .= ", $raptorconfig"; } |
247 for my $raptorconfig (sort {$a cmp $b} keys %{$allconfigs}) { $allconfigsstring .= ", $raptorconfig"; } |
248 $allconfigsstring =~ s/^, //; |
248 $allconfigsstring =~ s/^, //; |
249 print AGGREGATED "BUILT CONFIGS:<br/>$allconfigsstring<br/>\n"; |
249 print AGGREGATED "BUILT CONFIGS:<br/>$allconfigsstring<br/>\n"; |
250 |
250 |
251 print AGGREGATED "<br/>GENERAL FAILURES<br/>\n"; |
251 print AGGREGATED "<br/>FLOATING FAILURES<br/>\n"; |
252 print AGGREGATED "<table border='1'>\n"; |
252 print AGGREGATED "<table border='1'>\n"; |
253 my $tableheader = "<tr><th>category</th>"; |
253 my $tableheader = "<tr><th>category</th>"; |
254 for (@severities) { $tableheader .= "<th>$_</th>"; } |
254 for (@severities) { $tableheader .= "<th>$_</th>"; } |
255 $tableheader .= "</tr>"; |
255 $tableheader .= "</tr>"; |
256 print AGGREGATED "$tableheader\n"; |
256 print AGGREGATED "$tableheader\n"; |