diff --git a/qtest/module/TestDriver.pm b/qtest/module/TestDriver.pm
index d581216c..117e72c6 100644
--- a/qtest/module/TestDriver.pm
+++ b/qtest/module/TestDriver.pm
@@ -386,7 +386,8 @@ sub report
     push(@vals, map { $rep->{+__PACKAGE__}{$_} } ($f_passes, $f_fails,
 						  $f_xpasses, $f_xfails));
     my $socket = $rep->_socket();
-    $socket->print(join(' ', @vals)), "\n";
+    $socket->print(join(' ', @vals));
+    $socket->flush();
 }
 
 # Usage: notify(string)