diff --git a/src/tools/testcoordinator/buildall.pl b/src/tools/testcoordinator/buildall.pl
old mode 100644
new mode 100755
diff --git a/src/tools/testcoordinator/passes.pl b/src/tools/testcoordinator/passes.pl
new file mode 100755
index 00000000..c7ca9bde
--- /dev/null
+++ b/src/tools/testcoordinator/passes.pl
@@ -0,0 +1,17 @@
+#!perl -w
+use strict;
+use warnings;
+use POSIX "strftime";
+
+# Now parse the combined logs extracting build pass messages
+# lub32 20.47.55 --- Branch v2docs ubuntu gcc ILP32 confidence tests passed ---
+
+open(my $buildlog, "</tmp/buildall.log") // die "Could not read buildall.log.";
+open(my $passes,   ">log/buildpasses.log") // die "Could not create buildpasses.log.";
+while (<$buildlog>) {
+  if (/ --- Branch .* confidence tests passed ---/) {
+    print $passes $_;
+  }
+}
+close($buildlog);
+close($passes);
diff --git a/src/tools/testcoordinator/postpush.pl b/src/tools/testcoordinator/postpush.pl
old mode 100644
new mode 100755