[llvm-commits] CVS: llvm/utils/parseNLT.pl

[Andrew Lenharth]

Changes in directory llvm/utils:

parseNLT.pl added (r1.1)
---
Log message:

A first step towards being able to do more interesting things with the nightly tester data.  Moreinteresting things will come soon, so tune in

---
Diffs of the changes:  (+32 -0)

 parseNLT.pl |   32 ++++++++++++++++++++++++++++++++
 1 files changed, 32 insertions(+)


Index: llvm/utils/parseNLT.pl
diff -c /dev/null llvm/utils/parseNLT.pl:1.1
*** /dev/null	Tue Apr 26 21:13:30 2005
--- llvm/utils/parseNLT.pl	Tue Apr 26 21:13:20 2005
***************
*** 0 ****
--- 1,32 ----
+ #!/usr/bin/perl
+ # a first attempt to parse the nightly tester pages into something
+ # one can reason about, namely import into a database
+ # USE: perl parseNLT.pl <2005-03-31.html
+ # for example
+ 
+ while(<>)
+   {
+     if (/LLVM Test Results for (\w+) (\d+), (\d+)</)
+       {
+         $mon = $1;
+         $day = $2;
+         $year = $3;
+       }
+     if (/<td>([^<]+)<\/td>/)
+       {
+         if ($prefix)
+           { $output .= "$1 "; }
+       }
+     if (/<tr/)
+       {
+         if ($output)
+           { print "\n$day $mon $year $prefix/$output"; $output = ""; }
+       }
+     if (/<h2>(Programs.+)<\/h2>/)
+       {
+         $prefix = $1;
+       }
+   }
+ 
+ if ($output)
+   { print "\n$day $mon $year $prefix/$output"; $output = ""; }