Tests: use 127.0.0.1 instead of localhost. Name 'localhost' is ambiguous if ipv6 present on system.
diff --git a/lib/Test/Nginx.pm b/lib/Test/Nginx.pm index d5df67f..e386949 100644 --- a/lib/Test/Nginx.pm +++ b/lib/Test/Nginx.pm
@@ -212,7 +212,7 @@ alarm(2); my $s = IO::Socket::INET->new( Proto => 'tcp', - PeerHost => 'localhost:8080' + PeerAddr => '127.0.0.1:8080' ); log_out($request); $s->print($request);
diff --git a/lib/Test/Nginx/SMTP.pm b/lib/Test/Nginx/SMTP.pm index b3c132d..44c8eee 100644 --- a/lib/Test/Nginx/SMTP.pm +++ b/lib/Test/Nginx/SMTP.pm
@@ -22,8 +22,7 @@ my $self = return $class->SUPER::new( Proto => "tcp", - PeerAddr => "localhost", - PeerPort => 8025, + PeerAddr => "127.0.0.1:8025", @_ ) or die "Can't connect to nginx: $!\n";