diff --git a/tests/test_driver.pl b/tests/test_driver.pl
index 1824b1dc..f7dbc8d1 100644
--- a/tests/test_driver.pl
+++ b/tests/test_driver.pl
@@ -609,6 +609,8 @@ sub run_all_tests
         $run_filename = "$testpath.$runext";
         $tmp_filename = "$testpath.$tmpfilesuffix";
 
+        -f $perl_testname or die "Invalid test: $testname\n\n";
+
         setup_for_test();
 
         $output = "........................................................ ";