Hi,
Vieleicht findet jemand den Fehler!
nein, dazu fehlt die genaue Fehlerbeschreibung. Hast Du beispielsweise im Errorlog nachgesehen? Testausgaben gemacht? Pfade überprüft?
[src=http://www.searchup.de/promo-ten/submit.html]
Oh, Himmel... Laß mich raten: Der Autor heißt Matt Wright, richtig? Einzig das "use Socket;" am Anfang läßt mich daran zweifeln, ansonsten ist das unverkennbar Matt-Schrott[tm].
Lerne die Funktionsweise des Scripts und schreibe es neu. Beginne mit
#!/usr/bin/perl -w
use strict;
der Rest ergibt sich fast von selbst, wenn Du regelmäßig perldoc konsultierst.
Cheatah
P.S.: Sorry, falls das jetzt ein wenig destruktiv klang...