Home | History | Annotate | Download | only in perldriver

Lines Matching refs:HTML

5 #  * License & terms of use: http://www.unicode.org/copyright.html#License
19 my $outType = "HTML";
20 my $html = "noName";
56 print HTML "<td class=\"";
58 print HTML "value";
60 print HTML "worse";
62 print HTML "\">";
64 print HTML formatPercent(2, $mean);
66 print HTML formatNumber(2, $mult, $mean);
68 print HTML "</td>\n";
69 print HTML "<td class=\"";
71 print HTML "error";
73 print HTML "errorLarge";
75 print HTML "\">&plusmn;";
77 print HTML formatPercent(2, $error);
79 print HTML formatNumber(2, $mult, $error);
81 print HTML "</td>\n";
86 print HTML "<td class=\"sepvalue\">";
87 print HTML $value;
88 #print HTML formatNumber(2, 1, $value);
89 print HTML "</td>\n";
96 print HTML "<table $TABLEATTR>\n";
97 print HTML "<tbody>\n";
100 print HTML "<tr>\n";
101 print HTML "<th rowspan=\"2\" class=\"testNameHeader\"><a href=\"#TestName\">Test Name</a></th>\n";
102 print HTML "<th rowspan=\"2\" class=\"testNameHeader\"><a href=\"#Ops\">Ops</a></th>\n";
105 print HTML "<th colspan=".((4*($#headers+1))-2)." class=\"sourceType\">Per Operation</th>\n";
107 print HTML "<th colspan=".((2*($#headers+1))-2)." class=\"sourceType\">Per Operation</th>\n";
108 print HTML "<th colspan=".((5*($#headers+1))-2)." class=\"sourceType\">Per Event</th>\n";
110 print HTML "</tr>\n<tr>\n";
113 print HTML "<th class=\"source\" colspan=2><a href=\"#meanop_$header\">$header<br>/op</a></th>\n";
118 print HTML "<th class=\"source\" colspan=2><a href=\"#mean_op_$i\">ratio $i<br>/op</a></th>\n";
123 print HTML "<th class=\"source\"><a href=\"#events_$header\">$header<br>events</a></th>\n";
127 print HTML "<th class=\"source\" colspan=2><a href=\"#mean_ev_$header\">$header<br>/ev</a></th>\n";
131 print HTML "<th class=\"source\" colspan=2><a href=\"#mean_ev_$i\">ratio $i<br>/ev</a></th>\n";
135 print HTML "</tr>\n";
143 print HTML "</tr>\n";
144 print HTML "</tbody>";
145 print HTML "</table>\n";
153 print HTML "</tr>\n";
155 print HTML "<tr>";
162 print HTML "<td";
164 print HTML " align = $align>";
166 print HTML ">";
168 print HTML "$msg";
169 print HTML "</td>";
173 print HTML "$message";
195 if($outType eq 'HTML') {
196 $html = $date;
197 $html =~ s/://g; # ':' illegal
198 $html =~ s/\s*\d+$//; # delete year
199 $html =~ s/^\w+\s*//; # delete dow
200 $html = "$t $html.html";
202 $html = $options{ "outputDir" }."/".$html;
204 $html =~ s/ /_/g;
206 open(HTML,">$html") or die "Can't write to $html: $!";
208 #<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
209 print HTML <<EOF;
210 <HTML>
212 <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
240 print HTML "<H1>$title</H1>\n";
242 #print HTML "<H2>$TESTCLASS</H2>\n";
247 if($outType eq 'HTML') {
252 print HTML $legend;
254 print HTML <<EOF;
256 </HTML>
258 close(HTML) or die "Can't close $html: $!";
264 print HTML "<h2>Raw data</h2>";
269 print HTML "<table $TABLEATTR>\n";
275 print HTML "<tr><th class=\"testNameHeader\" colspan = 7>$printkey</td></tr>\n"; # locale and data file
277 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";
280 print HTML "<tr><th class=\"testName\" colspan = 6>$printkey</td></tr>\n"; # locale and data file
282 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";
288 print HTML "<tr>";
293 print HTML "<th class=\"testName\">";
295 print HTML "<a name=\"".$printkey."_".$test."\">".$test."</a>";
298 print HTML $test;
300 print HTML "</th>";
302 print HTML "<td class=\"string\">".$args."</td>";
304 print HTML "<td class=\"sepvalue\">".shift(@$j)."</td>";
305 print HTML "<td class=\"sepvalue\">".shift(@$j)."</td>";
309 print HTML "<td class=\"sepvalue\">".formatNumber(4, $mult, $ds->getMean)."</td><td class=\"sepvalue\">".formatNumber(4, $mult, $ds->getError)."</td>";
311 print HTML "<td class=\"sepvalue\">".shift(@$j)."</td>";
313 print HTML "</tr>\n";
351 print HTML "<th class=\"testName\"><a href=\"#".$loc."_".$testName."\">$testName</a></th>\n";