perl_set $backend '<br> sub {<br> use Digest::MD5 (md5_hex);<br> my $r = shift;<br> my $uri = $r->uri;<br> @arr = qw(
<a href="http://192.168.1.2">192.168.1.2</a> <a href="http://192.168.1.3">192.168.1.3</a> <a href="http://192.168.1.4">192.168.1.4</a> <a href="http://192.168.1.5">192.168.1.5</a>);<br> $arr_num = $#arr + 1;
<br> $url = substr(md5_hex($uri), -8);<br> $backend = $arr[hex($url) % $arr_num];<br> return $backend;<br> }<br> ';<br><br>location / {
<br> proxy_pass http://$backend$request_uri;<br>}<br>