[OpenID] Complete method in Perl?

[Recordon, David]

Hi Amiri,
What OpenID library for Perl are you using?
 
--David

________________________________

From: general-bounces at openid.net [mailto:general-bounces at openid.net] On
Behalf Of Amiri Barksdale
Sent: Tuesday, May 29, 2007 5:18 AM
To: general at openid.net
Subject: [OpenID] Complete method in Perl?


I am having a dickens of a time finishing an openid login. I am building
a consumer in perl, and I am wondering if anyone knows why this may not
be working? I know I have a valid login, but I still get a failure
response. Here is the code for the completion:

    my $query  = URI::Query->new( $ENV{QUERY_STRING} );
    my %query  = $query->hash;
    ...
    my $complete = $consumer->complete( \%query );


Here is what the IdP responds with before I try the above completion:

openid.sreg.gender:    * 
openid.response_nonce:    2007-05-29T12:13:15Z8mrI9U 
openid.mode:    id_res 
openid.sreg.email:    ***@***.*** 
openid.sreg.dob:    ****-**-** 
openid.assoc_handle:    {HMAC-SHA1}{4656da94}{mZCWxg==} 
openid.sreg.timezone:    America/*** 
openid.op_endpoint:    http://www.myopenid.com/server 
openid.sreg.nickname:    *** 
openid.sreg.postcode:    ***** 
openid.sreg.fullname:    *** 
openid.signed:
assoc_handle,identity,mode,op_endpoint,response_nonce,return_to,signed,s
reg.country,sreg.dob,sreg.email,sreg.fullname,sreg.gender,sreg.language,
sreg.nickname,sreg.postcode,sreg.timezone 
openid.sig:    MkrfIgxaxRkFMo+CJI1amtpSLBY= 
openid.identity:    http://***.myopenid.com/ 
nonce:    hvZi4DXd 
openid.sreg.language:    EN 
openid.return_to:
http://***.***.***.***/users/openid.html?nonce=hvZi4DXd 
openid.sreg.country:    US 



Amiri

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.openid.net/pipermail/openid-general/attachments/20070529/b0f10d1d/attachment-0002.htm>