http://xml.sa.mapquest.com:80/?transaction=mapimage&datalen=153&data=71e3Q01g%7EgHl04e%28cN1os1%22%3E0wR3KkDxayw%7CY%25+0As9wU75kgit%24TU%3Dna%3FH%3EJh9FL7nFsU40%5DltBFj%3A%2Bv%26b%7B2Ys2xuSx%23kMobGl%2B+tvDhBP%23%2CbF8b29

##</code><code>##

my $ua = LWP::UserAgent->new; 
$ua->timeout(10); 
$ua->env_proxy; 

$mapURL = "http://xml.sa.mapquest.com:80/?transaction=mapimage&datalen=153&data=71e3Q01g%7EgHl04e%28cN1os1%22%3E0wR3KkDxayw%7CY%25+0As9wU75kgit%24TU%3Dna%3FH%3EJh9FL7nFsU40%5DltBFj%3A%2Bv%26b%7B2Ys2xuSx%23kMobGl%2B+tvDhBP%23%2CbF8b29"
		 
my $response = $ua->get($mapURL, 
   'User-Agent' => 'Mozilla/5.0 [en] (Windows; U; Windows NT 6.0)', 
   'Accept' => 'image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, image/png, */*', 
   'Accept-Charset' => 'iso-8859-1,*,utf-8', 
   'Accept-Language' => 'en-US', 
); 
if ($response->is_success) { 
	print $response->content; 
}