Klammer/Syntaxfehler... den ich nicht finde

[roger]

Hallo,

folgender Code liefert in der letzten Zeile einen Fehler

  
my $socket = new IO::Socket::INET (  
				        PeerAddr => $rechnername,  
					PeerPort => $port,  
					Type => SOCK_STREAM,  
					Proto => 'tcp'  
					); die &schreibeLogeintrag("Unable to setup socket: $! im Script $0\n") unless defined $socket;

<pre> at ./ajax.cgi line 61.</pre>

das ist die letzte Zeile.
Ich kann mir nicht mehr helfen ich sehe es nicht. Funktion vorhanden... wird auch an anderer Stelle benutzt.

vielen Dank
    roger

[Struppi]

folgender Code liefert in der letzten Zeile einen Fehler

my $socket = new IO::Socket::INET (
        PeerAddr => $rechnername,
PeerPort => $port,
Type => SOCK_STREAM,
Proto => 'tcp'
); die &schreibeLogeintrag("Unable to setup socket: $! im Script $0\n") unless defined $socket;

>   
> <pre> at ./ajax.cgi line 61.</pre>  
  
Was ist das für eine Meldung? Die hat nichts mit dem obigen code zu tun.  
  

> Ich kann mir nicht mehr helfen ich sehe es nicht. Funktion vorhanden... wird auch an anderer Stelle benutzt.  
  
Welche Funktion? kann es sein, dass du uns nicht das zeigst, was du siehst?  
  
Struppi.

[roger]

Hallo,

Was ist das für eine Meldung? Die hat nichts mit dem obigen code zu tun.
Welche Funktion? kann es sein, dass du uns nicht das zeigst, was du siehst?

Struppi.

und Danke für die schnelle Antwort.
Ich Held, es war mein Fehler.
Da ich die Socket Rückmeldungen schlecht/bzw. nicht sauber ausgewertet habe kam es zu dem Fehler. Der "Server" lief nicht deshalb konnte keine Verbindung aufgebaut werden.

Sorry für die Mühe.

Trotzdem vielen Dank... ich werde das nächste mal erst nach dem einfachsten suchen.:-)

roger