diff --git a/test/old/testdir/test_perl.vim b/test/old/testdir/test_perl.vim
index ce2a566f62..37b1d08b1a 100644
--- a/test/old/testdir/test_perl.vim
+++ b/test/old/testdir/test_perl.vim
@@ -104,6 +104,7 @@ func Test_window_Cursor()
 endfunc
 
 func Test_window_SetHeight()
+  throw 'skipped: very flaky '
   new
   perl $curwin->SetHeight(2)
   call assert_equal(2, winheight(0))