Opened by YAPD at 2015-11-18 00:17
User since
2015-09-20
146 Artikel
BenutzerIn
2015-09-20
146 Artikel
BenutzerIn
Hallo hlubenow,
Danke für die Rückmeldung. Also das aktuelle Problem, das ich zur
Zeit habe, ist, dass ich es nun zwar geschafft habe, dass er Werte
aus dem Server zurückgibt. Und zwar auf diese Weise :
Führe ich nun das Client Script aus, das ich auf diese Weise ergänze :
gibt er in diesem Fenster die Werte des Arrays ( Eins , Zwei , Drei )
aus.
Ich möchte das aber von beiden Seiten, also dass ich erst den Benutzer
& den Lizenz - Schlüssel an das Server - Script liefere & nach der
Bearbeitung die Werte ( wie hier Eins , Zwei , Drei ) an das Client -
Script zurückgebe ( Funktioniert ja schon ).
Ich hoffe, dass ich es anschaulich erklärt habe. Sonst sagt mir nochmal
Bescheid.
Viele Grüße
YAPD
Last edited: 2015-11-18 19:30:19 +0100 (CET)
Danke für die Rückmeldung. Also das aktuelle Problem, das ich zur
Zeit habe, ist, dass ich es nun zwar geschafft habe, dass er Werte
aus dem Server zurückgibt. Und zwar auf diese Weise :
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
# 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 );
Führe ich nun das Client Script aus, das ich auf diese Weise ergänze :
Code: (dl
)
1
2
3
4
5
6
7
8
use IO::Socket::SSL;
my $client = IO::Socket::SSL->new( '87.230.94.39:8080' ) or die "Fehler bei der SSL - Verbindung !";
while( <$client> )
{
print $_;
}
gibt er in diesem Fenster die Werte des Arrays ( Eins , Zwei , Drei )
aus.
Ich möchte das aber von beiden Seiten, also dass ich erst den Benutzer
& den Lizenz - Schlüssel an das Server - Script liefere & nach der
Bearbeitung die Werte ( wie hier Eins , Zwei , Drei ) an das Client -
Script zurückgebe ( Funktioniert ja schon ).
Ich hoffe, dass ich es anschaulich erklärt habe. Sonst sagt mir nochmal
Bescheid.
Viele Grüße
YAPD
Last edited: 2015-11-18 19:30:19 +0100 (CET)
Yet Another Perl Developer