was ist an der syntax falsch?? - #103009 (Allgemeines zu Perl)

nepos

2007-11-26 12:46

User since
2005-08-17
1420 Artikel
BenutzerIn

Lass das

Code: (dl )

($socket)

weg oder ändere es in

Code: (dl )

($)

. So, wie du das in deinem Code hast, is das kein gültiger Prototyp für eine Perlfunktion.
Dann fehlt noch

Code (perl): (dl )

my $socket = shift;

als erste Zeile in deiner Sub, damit der Socket als Parameter eingelesen wird.