# HG changeset patch # User Sergey Kandaurov # Date 1556106773 -10800 # Node ID 30284bd9ab180cae9357c6001bdc8c948279fda9 # Parent 875967f737d479f5c743b87f245ff47ba6b14390 Tests: avoid uninitialized warnings in stream_upstream_random.t. diff --git a/stream_upstream_random.t b/stream_upstream_random.t --- a/stream_upstream_random.t +++ b/stream_upstream_random.t @@ -243,7 +243,8 @@ sub parallel { my @s = map { get($port, $uri, start => 1, sleep => 0.1) } (1 .. $n); for (@s) { - if (http_end($_) =~ /X-Port: (\d+)/) { + my $r = http_end($_); + if ($r && $r =~ /X-Port: (\d+)/) { $ports{$1} = 0 unless defined $ports{$1}; $ports{$1}++; }