A response from a net::google::authsub request
my $response = $auth->login($user, $pass);
if ($response->is_success) {
print "Yay!\n";
} else {
if ($response->error eq 'CaptchaRequired') {
print "Captcha Image ".$response->captchaurl;
}
}
Create a new response.
Returns whether the response was a sucess or not.
Methods available if the response was a success.
The authorisation token if the response is a success.
Not used yet.
Not used yet.
Methods available if the response was an error.
The error code. Can be one of
The login request used a username or password that is not recognized.
The account email address has not been verified. The user will need to access their Google account directly to resolve the issue before logging in using a non-Google application.
The user has not agreed to terms. The user will need to access their Google account directly to resolve the issue before logging in using a non-Google application.
A \s-1CAPTCHA\s0 is required. (A response with this error code will also contain an image \s-1URL\s0 and a \s-1CAPTCHA\s0 token.)
The error is unknown or unspecified; the request contained invalid input or was malformed.
The user account has been deleted.
The user account has been disabled.
The user's access to the specified service has been disabled. (The user account may still be valid.)
The service is not available; try again later.
The url of a page describing the error.
The token required to authenticate a captcha.
The full url of the captcha image.