Sockets und Threads mit Perl oder PHP

[Rebell]

Ich suche einen einfachsten Beispiel-Skript mit Sockets und Threads. Am Besten wäre natürlich ein kleiner Textbasierter Chat in optional beiden Skriptsprachen.

[Rebell]

HAbt ihr nichtmal ein paar Beispiel-Codes für Sockets mit Perl? Ich hab das O'Reilly für fortgeschrittene Perl-Programmierung, dort steht aber kein Client.

[blackm]

Hi Rebell,

also ich wollte mich in absehbarer Zukunft auch mal mit Sockets in Perl beschäftigen. Muß dazu aber auch erstmal einen Blick in Perl in a nutshell werfen. Wenn ich ich was auf die Reihe bekommen hab, dann kann ich dir ja mal was rüberschicken. Oder hast du schon was gefunden? Wie wär es mit http://www.perlfect.com/articles/sockets.shtml oder http://www.geocities.com/SiliconValley/Park/8312/sockets.htm (ist zwar für Win32 aber sollte auch gehen)?

by, blackm

[deac]

zu sockets:
einfach recht einfach;):
ein klient wäre etwa so:


use IO::Socket;
$sock = IO::Socket::INET->new (PeerHost=>"sth.server.com", PeerPort=>"1234", Proto=>"tcp");
print ($sock "Hallo!\nIch bin da;)");
print while(<$sock>);
close ($sock);

ein server etwa so:


use IO::Socket;
$tcpsock = IO::Socket::INET->new (Listen=>SOMAXCONN, LocalPort=>"1234", Proto=>"tcp", Reuse=1);
while ($sock = $tcpsock->accept)
{
$line = <$sock>;
print $line;
print $sock "Ich auch :-D");
close ($sock);
}


zu den threads:
vergisst es!
ich hab versucht perl mit threads zu kompilieren. klappte nicht. hab aber dann jemanden gefragt, der drüber etwas weiß und der sagte mir, dass es furchtbar langsam ist.
als alternative gäbe es da noch multitasking, nur das hat auch vor- und nachteile.
threads unter windoze sind wohl eher kein problem, da windoze kein multitasking kann und threads verwendet.

chatserver sind auch möglich mit POE (poe.perl.org).
mir gefällt es nicht so sehr, aber es ist eben geschmacksache.

[blackm]

Mensch cool! Funktioniert ja fast (zwei Sachen am Server geändert und dann ging es). Danke für das Beispiel.

by, Martin

[Rebell]

Ich habe hier etwas für Euch... Im Perl Kochbuch fand ich Beispiele die ich abgetippt habe. Sehe aber jetzt in dem geschriebenen nichtmehr durch. Was ich suche ist einen Server der threaden kann, also eine Art Chat. Schaut euch das mal an... (ist ein tar.bz2 - habs bloß umbenannt).

[blackm]

Ich werd mir das bei gelegenheit mal ansehen...

by, Martin

[blackm]

Also das mit dem Chat hat funktioniert. Hab hier auch noch was schönes gefunden: http://blacksun.box.sk/tutorials.php?id=102

by, blackm