Help for this page
my ($fd1, $fd2) = winsocketpair();
use Socket qw( AF_UNIX SOCK_STREAM PF_UNSPEC ); socketpair(my $fd1, my $fd2, AF_UNIX, SOCK_STREAM, PF_UNSPEC)