#!usr/bin/perl

print "Content-Type: text/html\n\n";

my $url = "http://WEBSITE_HERE";

use LWP::UserAgent;
use HTTP::Request::Common qw(GET POST);

my $agent = LWP::UserAgent->new;
my $req = GET $url, Referer => "(REFERER_VALUE_HERE)"; 

print $agent->request($req)->as_string;