# accept client

my $client = $server->accept or die
    "failed to accept or ssl handshake: !";
	
my @Testumgebung = ( 'Eins' , 'Zwei' , 'Drei' );
	
# print $client "POST / HTTP/1.0\r\n\r\n";

print $client "@Testumgebung";
print "Erfolgreiche Authentifizierung" , "\n";	

close( $client );