layout/tools/reftest/clean-reftest-output.pl

branch
TOR_BUG_3246
changeset 6
8bccb770b82d
equal deleted inserted replaced
-1:000000000000 0:9bf1ac311541
1 #!/usr/bin/perl
2 # vim: set shiftwidth=4 tabstop=8 autoindent expandtab:
3 # This Source Code Form is subject to the terms of the Mozilla Public
4 # License, v. 2.0. If a copy of the MPL was not distributed with this
5 # file, You can obtain one at http://mozilla.org/MPL/2.0/.
6
7 # This script is intended to be run over the standard output of a
8 # reftest run. It will extract the parts of the output run relevant to
9 # reftest and HTML-ize the URLs.
10
11 use strict;
12
13 print <<EOM
14 <html>
15 <head>
16 <title>reftest output</title>
17 </head>
18 <body>
19 <pre>
20 EOM
21 ;
22
23 while (<>) {
24 next unless /REFTEST/;
25 chomp;
26 chop if /\r$/;
27 s,(TEST-)([^\|]*) \| ([^\|]*) \|(.*),\1\2: <a href="\3">\3</a>\4,;
28 s,(IMAGE[^:]*): (data:.*),<a href="\2">\1</a>,;
29 print;
30 print "\n";
31 }
32
33 print <<EOM
34 </pre>
35 </body>
36 </html>
37 EOM
38 ;

mercurial