Mercurial > hg > nginx-tests
comparison lib/Test/Nginx/Stream.pm @ 969:1edb092149e2
Tests: simplified parallel tests.
Now configurations are automatically scanned for "127.0.0.1:8xxx", and
ports are auto-replaced by free ones. The exact port specified is used
if it's free.
| author | Maxim Dounin <mdounin@mdounin.ru> |
|---|---|
| date | Fri, 08 Jul 2016 02:21:14 +0300 |
| parents | 9361c7eddfc1 |
| children | 91e64c1ceec9 |
comparison
equal
deleted
inserted
replaced
| 968:ce687b25ea49 | 969:1edb092149e2 |
|---|---|
| 39 unshift(@_, "PeerAddr") if @_ == 1; | 39 unshift(@_, "PeerAddr") if @_ == 1; |
| 40 | 40 |
| 41 $self->{_socket} = IO::Socket::INET->new( | 41 $self->{_socket} = IO::Socket::INET->new( |
| 42 Proto => "tcp", | 42 Proto => "tcp", |
| 43 PeerAddr => '127.0.0.1', | 43 PeerAddr => '127.0.0.1', |
| 44 PeerPort => ($Test::Nginx::ports[0]{port} || 8080), | 44 PeerPort => port(8080), |
| 45 @_ | 45 @_ |
| 46 ) | 46 ) |
| 47 or die "Can't connect to nginx: $!\n"; | 47 or die "Can't connect to nginx: $!\n"; |
| 48 | 48 |
| 49 if ({@_}->{'SSL'}) { | 49 if ({@_}->{'SSL'}) { |