diff --git a/tests/runtests.pl b/tests/runtests.pl
index 144952249e..a6ba2012cd 100755
--- a/tests/runtests.pl
+++ b/tests/runtests.pl
@@ -2543,7 +2543,7 @@ if($skipped) {
         # now show all test case numbers that had this reason for being
         # skipped
         my $c=0;
-        for(0 .. $lasttest) {
+        for(0 .. scalar @teststat) {
             my $t = $_;
             if($teststat[$_] eq $r) {
                 logmsg ", " if($c);