#!/usr/bin/perl -T

use LWP::UserAgent;
use CGI::Carp qw(fatalsToBrowser);
use CGI qw(:standard);
$url = param('name');
print header;
print start_html('My Remote Webpage Request Service');
my $ua = LWP::UserAgent->new;
my $res = $ua->get($url);
print $res->content;
print end_html;