Lines Matching refs:html
66 my $html = $date;
67 $html =~ s/://g; # ':' illegal
68 $html =~ s/\s*\d+$//; # delete year
69 $html =~ s/^\w+\s*//; # delete dow
70 $html = "perf $html.html";
72 open(HTML,">$html") or die "Can't write to $html: $!";
74 print HTML <<EOF;
75 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
77 <HTML>
83 print HTML "<H1>$title</H1>\n";
85 print HTML "<H2>$TESTCLASS</H2>\n";
94 print HTML "<P><TABLE $TABLEATTR><TR><TD>\n";
95 print HTML "<P><B>$testMethod vs. $baselineMethod</B></P>\n";
97 print HTML "<P><TABLE $TABLEATTR BGCOLOR=\"#CCFFFF\">\n";
98 print HTML "<TR><TD>Options</TD><TD>$testMethod</TD>";
99 print HTML "<TD>$baselineMethod</TD><TD>Ratio</TD></TR>\n";
104 print HTML "<TR><TD>@$pat[0], \"@$pat[1]\", \"@$pat[2]\"</TD>\n";
113 print HTML "<TD>", formatSeconds(4, $t->getMean(), $t->getError);
114 print HTML "/event</TD>\n";
121 print HTML "<TD>", formatSeconds(4, $b->getMean(), $t->getError);
122 print HTML "/event</TD>\n";
130 print HTML "<TD><B><FONT COLOR=\"$color\">", formatPercent(3, $mean, $r->getError);
131 print HTML "</FONT></B></TD></TR>\n";
134 print HTML "</TABLE></P>\n";
136 print HTML "<P>Raw data:</P>\n";
137 print HTML $OUT;
138 print HTML "</TABLE></P>\n";
141 print HTML <<EOF;
143 </HTML>
145 close(HTML) or die "Can't close $html: $!";
