[perl_openvz] use hostname over veid