add overall timing info

Signed-off-by: Jason Etheridge <jason@esilibrary.com>

diff --git a/qa/test_output_webifier.pl b/qa/test_output_webifier.pl
index 36f3f50..9d2a441 100755 (executable)
--- a/qa/test_output_webifier.pl
+++ b/qa/test_output_webifier.pl
@@ -9,6 +9,7 @@ my $subpage_count = 0;
 my $subpage = '';
 my $opensrf_tip = '';
 my $evergreen_tip = '';
+my @all_lines = ();
 
 open  MAIN_PAGE, ">test.html";
 print MAIN_PAGE html_header('Test Output Summary');
@@ -20,6 +21,7 @@ print MAIN_PAGE "<ul>\n";
 open PASS_FAIL, ">pass_fail.txt";
 
 while (my $line = <>) {
+    push @all_lines, $line;
     if ($line =~ /Tip of OpenSRF: (.*)/) {
         $opensrf_tip = $1;
     }
@@ -91,7 +93,15 @@ while (my $line = <>) {
     }
 }
 print_pass_or_fail();
-print MAIN_PAGE "</ul>\n" . branch_tips() . "\n" . html_footer();
+print MAIN_PAGE "</ul>\n";
+print MAIN_PAGE "<h2>Timing</h2>\n<pre>";
+my $sys_time = pop @all_lines;
+my $user_time = pop @all_lines;
+my $real_time = pop @all_lines;
+print MAIN_PAGE "$real_time$user_time$sys_time";
+print MAIN_PAGE "</pre>\n";
+print MAIN_PAGE branch_tips() . "\n";
+print MAIN_PAGE html_footer();
 close MAIN_PAGE;
 close PASS_FAIL;
 update_rss();