[OpenID] Complete method in Perl?

[Amiri Barksdale]

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,
sreg.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/559c9261/attachment-0002.htm>