#! /usr/bin/perl -w
use LWP::UserAgent;

$ua = LWP::UserAgent->new;
$res = $ua->get("http://somesite/index.php?id=123456")->as_string;
print $res;