http://7fh6tueqddpjyxjmgtdiueylzoqt6pt7hec3pukyptlmohoowvhde4yd.onion/public-inbox.git/tree/lib/PublicInbox/Daemon.pm
SpamAssassin and Net::Server use # Socket6, so it may be installed on our system, already # (otherwise die here): require Socket6 ; ( $port , $host ) = Socket6 :: unpack_sockaddr_in6 ( $addr ); $host = Socket6 :: inet_ntop ( Socket6 :: AF_INET6 (), $host ); } ( $host , $port ); } sub host_with_port ($) { my ( $addr ) = @_ ; my ( $port , $host ); # this eval will die on Unix sockets: eval { if ( length ( $addr ) >= 28 ) { (...