Help for this page

Select Code to Download


  1. or download this
    my $request = HTTP::Request->new("GET", "http://cnn.com/europe");
my $response = $ua->simple_request($request);
print $response->header("Location"), "\n";
# http://europe.cnn.com
  2. or download this
    my $request = HTTP::Request->new("GET", "http://cnn.com/europe");
my $response = $ua->request($request);
print $response->previous->header("Location"), "\n";
# http://europe.cnn.com