$agent->requests_redirectable( [] ); ##

##

$post_response = $agent->click('continue');
my $status = $agent->status();

if (($status >= 300) && ($status < 400)) 
{
	my $location = $agent->response()->header('Location');
	
  	if (defined $location) 
	  {
    	print "Redirected to $location\n";
    	$post_response = $agent->get(URI->new_abs($location, $agent->base()));
		printf("post_response is %s\n", $post_response->status_line);
  	}
}

##

##

Redirected to /misc/XXXX/processocp.cgi?email=XXXX&back=httpXXXXX&splash=X&vskey=XXXX
post_response is 200 OK

##

##

$post_response->decoded_content()

##

##









Processing...please wait