… | |
… | |
40 | } |
40 | } |
41 | |
41 | |
42 | my $af_inet6; |
42 | my $af_inet6; |
43 | |
43 | |
44 | $af_inet6 ||= eval { require Socket ; Socket::AF_INET6 () }; |
44 | $af_inet6 ||= eval { require Socket ; Socket::AF_INET6 () }; |
45 | $af_ine6t ||= eval { require Socket6; Socket6::AF_INET6() }; |
45 | $af_inet6 ||= eval { require Socket6; Socket6::AF_INET6() }; |
46 | |
46 | |
47 | # uhoh |
47 | # uhoh |
48 | $af_inet6 ||= 10 if $^O =~ /linux/; |
48 | $af_inet6 ||= 10 if $^O =~ /linux/; |
49 | $af_inet6 ||= 23 if $^O =~ /cygwin/i; |
49 | $af_inet6 ||= 23 if $^O =~ /cygwin/i; |
50 | $af_inet6 ||= 23 if AnyEvent::WIN32; |
50 | $af_inet6 ||= 23 if AnyEvent::WIN32; |