Finns det någon anledning till att du använder socketsmodulen rakt av ? Om du kan installera egna perlmoduler så är en enkel lösning att köra LWP (
http://lwp.linpro.no/lwp/), med LWP::Simple så är det jättesmidigt. Kan dras ner från CPAN ( perl -MCPAN -e 'install LWP::Simple' alt dra ner tarbollen och installera själv) och är väldigt stabilt, använt och genomarbetat.
kodexempel:
Kod:
use LWP::Simple;
$sidan= get("https://www.server.co/script.php?alsladlasd");
if ($sidan)
*{
* * print $sidan;
*}
*else
*{
* * print "kunde inte ladda sidan";
*}