$comm->Write($socket, [$app, $version, $user, $password]);
	print "write: $!\n";
    $self->Debug("Waiting for server's response ...");
    my $reply = $comm->Read($socket);
	print "read: $!\n";

##</code><code>##

write: Inappropriate I/O control operation
read: