Hi,
Zuerst muss ich noch sagen, dass ich ziemlicher Anfänger bin, was Perl angeht,
dann nehme ich an, dass die Wahl auf Sockets vor allem deswegen fiel, weil Du nichts besseres kennst, richtig? :-) Für HTTP-Requests hat Perl die CPAN[1]-Module LWP::Simple oder LWP::UserAgent vorgesehen; je nach gewünschter Funktionalität. Doku ist (wie immer) dabei, und die Module sollten auch bereits installiert sein.
#!/bin/perl
Beginne lieber mit
#!/bin/perl -w
use strict;
Das meldet Dir auch solche Fehler, die Du sonst nur schwer entdeckst.
print "Content-Type: text/html\n\n";
use CGI ':standard';
print header;
Mehr unter perldoc CGI.
print get("http://www.perlhelp.de/");
Bei LWP::Simple bleibt dieser Aufruf identisch ;-) wobei Du auch getprint() verwenden kannst.
Cheatah
X-Will-Answer-Email: No