Home | History | Annotate | Download | only in perldriver

Lines Matching refs:HTML

15 my $outType = "HTML";
16 my $html = "noName";
52 print HTML "<td class=\"";
54 print HTML "value";
56 print HTML "worse";
58 print HTML "\">";
60 print HTML formatPercent(2, $mean);
62 print HTML formatNumber(2, $mult, $mean);
64 print HTML "</td>\n";
65 print HTML "<td class=\"";
67 print HTML "error";
69 print HTML "errorLarge";
71 print HTML "\">&plusmn;";
73 print HTML formatPercent(2, $error);
75 print HTML formatNumber(2, $mult, $error);
77 print HTML "</td>\n";
82 print HTML "<td class=\"sepvalue\">";
83 print HTML $value;
84 #print HTML formatNumber(2, 1, $value);
85 print HTML "</td>\n";
92 print HTML "<table $TABLEATTR>\n";
93 print HTML "<tbody>\n";
96 print HTML "<tr>\n";
97 print HTML "<th rowspan=\"2\" class=\"testNameHeader\"><a href=\"#TestName\">Test Name</a></th>\n";
98 print HTML "<th rowspan=\"2\" class=\"testNameHeader\"><a href=\"#Ops\">Ops</a></th>\n";
101 print HTML "<th colspan=".((4*($#headers+1))-2)." class=\"sourceType\">Per Operation</th>\n";
103 print HTML "<th colspan=".((2*($#headers+1))-2)." class=\"sourceType\">Per Operation</th>\n";
104 print HTML "<th colspan=".((5*($#headers+1))-2)." class=\"sourceType\">Per Event</th>\n";
106 print HTML "</tr>\n<tr>\n";
109 print HTML "<th class=\"source\" colspan=2><a href=\"#meanop_$header\">$header<br>/op</a></th>\n";
114 print HTML "<th class=\"source\" colspan=2><a href=\"#mean_op_$i\">ratio $i<br>/op</a></th>\n";
119 print HTML "<th class=\"source\"><a href=\"#events_$header\">$header<br>events</a></th>\n";
123 print HTML "<th class=\"source\" colspan=2><a href=\"#mean_ev_$header\">$header<br>/ev</a></th>\n";
127 print HTML "<th class=\"source\" colspan=2><a href=\"#mean_ev_$i\">ratio $i<br>/ev</a></th>\n";
131 print HTML "</tr>\n";
139 print HTML "</tr>\n";
140 print HTML "</tbody>";
141 print HTML "</table>\n";
149 print HTML "</tr>\n";
151 print HTML "<tr>";
158 print HTML "<td";
160 print HTML " align = $align>";
162 print HTML ">";
164 print HTML "$msg";
165 print HTML "</td>";
169 print HTML "$message";
191 if($outType eq 'HTML') {
192 $html = $date;
193 $html =~ s/://g; # ':' illegal
194 $html =~ s/\s*\d+$//; # delete year
195 $html =~ s/^\w+\s*//; # delete dow
196 $html = "$t $html.html";
198 $html = $options{ "outputDir" }."/".$html;
200 $html =~ s/ /_/g;
202 open(HTML,">$html") or die "Can't write to $html: $!";
204 #<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
205 print HTML <<EOF;
206 <HTML>
208 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
236 print HTML "<H1>$title</H1>\n";
238 #print HTML "<H2>$TESTCLASS</H2>\n";
243 if($outType eq 'HTML') {
248 print HTML $legend;
250 print HTML <<EOF;
252 </HTML>
254 close(HTML) or die "Can't close $html: $!";
260 print HTML "<h2>Raw data</h2>";
265 print HTML "<table $TABLEATTR>\n";
271 print HTML "<tr><th class=\"testNameHeader\" colspan = 7>$printkey</td></tr>\n"; # locale and data file
273 print HTML "<tr><th class=\"testName\">test name</th><th class=\"testName\">interesting arguments</th><th class=\"testName\">iterations</th><th class=\"testName\">operations</th><th class=\"testName\">mean time (ns)</th><th class=\"testName\">error (ns)</th><th class=\"testName\">events</th></tr>\n";
276 print HTML "<tr><th class=\"testName\" colspan = 6>$printkey</td></tr>\n"; # locale and data file
278 print HTML "<tr><th class=\"testName\">test name</th><th class=\"testName\">interesting arguments</th><th class=\"testName\">iterations</th><th class=\"testName\">operations</th><th class=\"testName\">mean time (ns)</th><th class=\"testName\">error (ns)</th></tr>\n";
284 print HTML "<tr>";
289 print HTML "<th class=\"testName\">";
291 print HTML "<a name=\"".$printkey."_".$test."\">".$test."</a>";
294 print HTML $test;
296 print HTML "</th>";
298 print HTML "<td class=\"string\">".$args."</td>";
300 print HTML "<td class=\"sepvalue\">".shift(@$j)."</td>";
301 print HTML "<td class=\"sepvalue\">".shift(@$j)."</td>";
305 print HTML "<td class=\"sepvalue\">".formatNumber(4, $mult, $ds->getMean)."</td><td class=\"sepvalue\">".formatNumber(4, $mult, $ds->getError)."</td>";
307 print HTML "<td class=\"sepvalue\">".shift(@$j)."</td>";
309 print HTML "</tr>\n";
347 print HTML "<th class=\"testName\"><a href=\"#".$loc."_".$testName."\">$testName</a></th>\n";