Lines Matching refs:HTML
3 # * License & terms of use: http://www.unicode.org/copyright.html#License
53 # [ "arabic.html", "UTF-8", "b"],
54 # [ "czech.html", "UTF-8", "b"],
55 # [ "danish.html", "UTF-8", "b"],
56 # [ "english.html", "UTF-8", "b"],
57 # [ "esperanto.html", "UTF-8", "b"],
58 # [ "french.html", "UTF-8", "b"],
59 # [ "georgian.html", "UTF-8", "b"],
60 # [ "german.html", "UTF-8", "b"],
61 # [ "greek.html", "UTF-8", "b"],
62 # [ "hebrew.html", "UTF-8", "b"],
63 # [ "hindi.html", "UTF-8", "b"],
64 # [ "icelandic.html", "UTF-8", "b"],
65 # [ "interlingua.html", "UTF-8", "b"],
66 # [ "italian.html", "UTF-8", "b"],
67 # [ "japanese.html", "UTF-8", "b"],
68 # [ "korean.html", "UTF-8", "b"],
69 # [ "lithuanian.html", "UTF-8", "b"],
70 # [ "maltese.html", "UTF-8", "b"],
71 # [ "persian.html", "UTF-8", "b"],
72 # [ "polish.html", "UTF-8", "b"],
73 # [ "portuguese.html", "UTF-8", "b"],
74 # [ "romanian.html", "UTF-8", "b"],
75 # [ "russian.html", "UTF-8", "b"],
76 # [ "s-chinese.html", "UTF-8", "b"],
77 # [ "spanish.html", "UTF-8", "b"],
78 # [ "swedish.html", "UTF-8", "b"],
79 # [ "t-chinese.html", "UTF-8", "b"],
80 # [ "welsh.html", "UTF-8", "b"],
117 my $html = $date;
118 $html =~ s/://g; # ':' illegal
119 $html =~ s/\s*\d+$//; # delete year
120 $html =~ s/^\w+\s*//; # delete dow
121 $html = "perf $html.html";
123 open(HTML,">$html") or die "Can't write to $html: $!";
125 print HTML <<EOF;
126 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
128 <HTML>
134 print HTML "<H1>$title</H1>\n";
136 print HTML "<H2>$TESTCLASS</H2>\n";
145 print HTML "<P><TABLE $TABLEATTR><TR><TD>\n";
146 print HTML "<P><B>$testMethod vs. $baselineMethod</B></P>\n";
148 print HTML "<P><TABLE $TABLEATTR BGCOLOR=\"#CCFFFF\">\n";
149 print HTML "<TR><TD>Options</TD><TD>$testMethod</TD>";
150 print HTML "<TD>$baselineMethod</TD><TD>Ratio</TD></TR>\n";
155 print HTML "<TR><TD>@$pat[0], @$pat[2]</TD>\n";
164 print HTML "<TD>", formatSeconds(4, $t->getMean(), $t->getError);
165 print HTML "/event</TD>\n";
172 print HTML "<TD>", formatSeconds(4, $b->getMean(), $t->getError);
173 print HTML "/event</TD>\n";
181 print HTML "<TD><B><FONT COLOR=\"$color\">", formatPercent(3, $mean, $r->getError);
182 print HTML "</FONT></B></TD></TR>\n";
185 print HTML "</TABLE></P>\n";
187 print HTML "<P>Raw data:</P>\n";
188 print HTML $OUT;
189 print HTML "</TABLE></P>\n";
192 print HTML <<EOF;
194 </HTML>
196 close(HTML) or die "Can't close $html: $!";
