Update ngx_http_lua_upstream_module.c

Hello agentzh, can you spare 5 min to sort out this line: "peer->server = lua_tostring(L, 4);"
As you see I am trying to extend functionality but getting stuck on this line, I am aware I can't change the ip length but Rome wasn't build in a day either :)