Mercurial > hg > nginx-tests

comparison upstream_hash.t @ 925:6bb1f2ccd386

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: removed unused variables.
author Andrey Zelenkov <zelenkov@nginx.com>
date Fri, 13 May 2016 14:46:07 +0300
parents 6cdfd177319b
children e9064d691790
comparison
equal deleted inserted replaced
924:54680c434afa 925:6bb1f2ccd386
216 216
217 sub many { 217 sub many {
218 my ($uri, $count) = @_; 218 my ($uri, $count) = @_;
219 my %ports; 219 my %ports;
220 220
221 for my $i (1 .. $count) { 221 for (1 .. $count) {
222 if (http_get($uri) =~ /X-Port: (\d+)/) { 222 if (http_get($uri) =~ /X-Port: (\d+)/) {
223 $ports{$1} = 0 unless defined $ports{$1}; 223 $ports{$1} = 0 unless defined $ports{$1};
224 $ports{$1}++; 224 $ports{$1}++;
225 } 225 }
226 } 226 }