uti: Add/Modify test programs

Change-Id: I27a39d6b11af5243f93d07c31c2ef80f6727dd53
2018-09-03 15:09:15 +09:00
parent 52afbbbc98
commit 4438f994dc
97 changed files with 17368 additions and 0 deletions
--- a/test/uti/CT11.pl
+++ b/test/uti/CT11.pl
@ -0,0 +1,17 @@
+#!/usr/bin/perl
+
+while(<>) {
+#    print $_;
+    @row = split(/\s+/, $_);
+#    print $row[0]."\n";
+    $nsec{$row[0]} += $row[1];
+    $count{$row[0]}++;
+    if ($bitmap{$row[0]} == "") {
+	push @names, ($row[0]);
+    }
+    $bitmap{$row[0]} = 1;
+}
+
+foreach $name (@names) {
+    print $name . ',' . $nsec{$name} / $count{$name} . "\n";
+}