use IO::Socket::INET  qw( AF_INET );
use IO::Socket::INET6 qw( AF_INET6 );

my $server = IO::Socket->new(
   Domain     => ($ip6 ? AF_INET6 : AF_INET),
   Proto      => 'tcp',        # Makes sense for this to be variable.
   LocalHost  => $localHost,   # You sure you want this? Rarely do.
   LocalPort  => $socket_port,
   Reuse      => 1,
   Listen     => $conn,
) or die "Can't make $protocol server on port $socket_port: $@\n";

print "Running on port $socket_port.\n" if $verbose;