diff --git a/tests/scripts/run-test-suites.pl b/tests/scripts/run-test-suites.pl
index ab9db8255..b91355d30 100644
--- a/tests/scripts/run-test-suites.pl
+++ b/tests/scripts/run-test-suites.pl
@@ -21,12 +21,12 @@ for my $suite (@suites)
     my $result = `$prefix$suite`;
     if( $result =~ /PASSED/ ) {
         print "PASS\n";
+        my ($tests, $skipped) = $result =~ /([0-9]*) tests.*?([0-9]*) skipped/;
+        $total_tests_run += $tests - $skipped;
     } else {
         $failed_suites++;
         print "FAIL\n";
     }
-    my ($tests, $skipped) = $result =~ /([0-9]*) tests.*?([0-9]*) skipped/;
-    $total_tests_run += $tests - $skipped;
 }
 
 print "-" x 72, "\n";