Add missing include in Cluster.pm

The postmaster test 004_negotiate.pl could fail due to IO::Socket::INET
gone missing, in environments that cannot use Unix sockets.

Oversight in the backport done in 6dffaeb8e54c, so like the other commit
this is applied across the v14~17 range.  Per buildfarm member drongo.

Security: CVE-2026-6479
Backpatch-through: 14

diff --git a/src/test/perl/PostgresNode.pm b/src/test/perl/PostgresNode.pm
index b4424079fa6829a47904956dc91b0b728b4d996b..11c2c6594b65569c534ef8a5e624a5b8577a68c5 100644 (file)
--- a/src/test/perl/PostgresNode.pm
+++ b/src/test/perl/PostgresNode.pm
@@ -98,6 +98,7 @@ use File::Path qw(rmtree mkpath);
 use File::Spec;
 use File::stat qw(stat);
 use File::Temp ();
+use IO::Socket::INET;
 use IPC::Run;
 use PostgresVersion;
 use RecursiveCopy;