diff options
author | Craig A. Berry <craigberry@mac.com> | 2022-09-23 12:42:17 -0500 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2022-09-23 12:42:17 -0500 |
commit | 92ee38c43e6b2dfb9ccf6fd69cb7aba99241b629 (patch) | |
tree | f5b9165265912ef70f9453344f96b28d5b7b0991 /t/io | |
parent | 881a2f91cb76930d44b28088c0d7636cd4ca6d57 (diff) | |
download | perl-92ee38c43e6b2dfb9ccf6fd69cb7aba99241b629.tar.gz |
SO_SNDBUF requires elevated privileges on VMS
So we can't reasonably run a test that tries to change the socket
buffer size.
Diffstat (limited to 't/io')
-rw-r--r-- | t/io/socket.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/io/socket.t b/t/io/socket.t index 7605514147..fded8cb0dc 100644 --- a/t/io/socket.t +++ b/t/io/socket.t @@ -350,6 +350,7 @@ SKIP: { eval { Socket::IPPROTO_TCP(); 1 } or skip 'no IPPROTO_TCP', 1; eval { Socket::SOL_SOCKET(); 1 } or skip 'no SOL_SOCKET', 1; eval { Socket::SO_SNDBUF(); 1 } or skip 'no SO_SNDBUF', 1; + skip 'setting socket buffer size requires elevated privileges', 1 if $^O eq 'VMS'; # The value of SNDBUF_SIZE constant below is changed from #19892 testcase; # original "262144" may be clamped on low-memory systems. |