abgesehen davon, dass ein paar Variablen nicht genutzt werden (perl -w meckert sowas an) ist Deine Funktion richtig. Du machst mich nun neugierig: Was genau geht damit auf einem Fremdserver nicht?
Viele Grüße, Rolf
Teste mal den Link oben
Gruß,
Volker