require HTTP::Request;
require LWP::UserAgent;

$request = HTTP::Request->new(GET => 'http://blogger323.blog83.fc2.com/sitemaps.xml');
$ua = LWP::UserAgent->new;
# $ua->proxy('http', 'http://yourproxy.co.jp:8001/');

$response = $ua->request($request);

if ($response->is_success) {
  print $response->content;
}
else {
  die $response->status_line;
}