use LWP::UserAgent;
use Crypt::SSLeay;

$hdrs = new HTTP::Headers(Accept => 'text/plain', User-Agent => 'MegaBrowser/1.0');
$url = new URI::URL('https://payflowlink.verisign.com/payflowlink.cfm');
$url = new URI::URL('https://www.nodeworks.com');
$req = new HTTP::Request('GET', $url, $hdrs);
$ua = new LWP::UserAgent;
$resp = $ua->request($req);
if ($resp->is_success) {
        print "did work.  yay!";
        print $resp->content;
}
else {
        print "didn't work.\n";
        print $resp->message;
}