add initial support for dynamically getting peers from the cluster, make InetAddress compat with Perl <= 5.10.1, minor code formatting cleanup (more needed)