Refactoring BIO: small test correction

Reviewed-by: Viktor Dukhovni <viktor@openssl.org>

util/TLSProxy/Proxy.pm

diff --git a/util/TLSProxy/Proxy.pm b/util/TLSProxy/Proxy.pm
index 7082486..dab3d34 100644
--- a/util/TLSProxy/Proxy.pm
+++ b/util/TLSProxy/Proxy.pm
@@ -209,7 +209,7 @@
     }
 
     # Create the Proxy socket
-    my $proxaddr = $self->server_addr;
+    my $proxaddr = $self->proxy_addr;
     $proxaddr =~ s/[\[\]]//g; # Remove [ and ]
     my $proxy_sock = $IP_factory->(
         LocalHost   => $proxaddr,