Hi Clint,
You'll notice that in the (albeit crappy) output that there is an
error message that says:
Invalid API key.
Can you verify your API key and secret with Facebook's test console?
http://developers.facebook.com/tools.php
Clayton
On Sun, Mar 8, 2009 at 8:10 PM, ClintJCL@gmail.com via RT
<bug-WWW-Facebook-API@rt.cpan.org> wrote:
Show quoted text> Sun Mar 08 20:10:32 2009: Request 43953 was acted upon.
> Transaction: Ticket created by ClintJCL@gmail.com
> Queue: WWW-Facebook-API
> Subject: just so you know
> Broken in: (no value)
> Severity: (no value)
> Owner: Nobody
> Requestors: ClintJCL@gmail.com
> Status: new
> Ticket <URL:
http://rt.cpan.org/Ticket/Display.html?id=43953 >
>
>
> the sample program in your API doc:
>
http://backpan.perl.org/authors/id/U/UN/UNOBE/WWW-Facebook-API-v0.3.1.readme
>
>
> doesn't even work.. it says:
>
>
> Enter your public API key: XXXXXXXXXXXXXXXXXXX
> Enter your API secret: XXXXXXXXXXXXXXXXXXX
> Enter your e-mail address: clintjcl@gmail.com
> Enter your password: XXXXXXXXXXXXXXXXXXX
> Error during REST auth.createToken call:
> params =
> api_key:XXXXXXXXXXXXXXXXXXX
> call_id:1236557190.38875
> format:JSON
> method:facebook.auth.createToken
> v:1.0
> response =
> {"error_code":101,"error_msg":"Invalid API
> key","request_args":[{"key":"api_key","value":"XXXXXXXXXXXXXXXXXXX\r"},{"key
> ":"call_id","value":"1236557190.38875"},{"key":"format","value":"JSON"},{"key":"method","value":"facebook.auth.createToken"},{"key":
> "v","value":"1.0"},{"key":"sig","value":"20ea41af9f8d1800134d68c4e122cd99"}]}
> WWW::Facebook::API::call('WWW::Facebook::API=HASH(0x207dae0)',
> 'auth.createToken') called at C:/Perl/site/lib/WWW/Facebook/A
> PI/Auth.pm line 26
>
> WWW::Facebook::API::Auth::create_token('WWW::Facebook::API::Auth=HASH(0x20fa728)')
> called at C:/Perl/site/lib/WWW/Facebook/A
> PI/Auth.pm line 78
>
> WWW::Facebook::API::Auth::login('WWW::Facebook::API::Auth=HASH(0x20fa728)',
> 'email', 'clintjcl@gmail.com\x{d}', 'pass', 'XXXXXXXXXXXXXXXXXXX\x{d}')
> called at C:\pics\apitest.pl line 22
>
>
> where apitest.pl was simply me copying and pasting the code in.
>
> I can't get the Perl Facebook API to do.. well...anything, unfortunately.
>
> Just thought I"d let you know.
>
> -Clint
>
>
>
> the sample program in your API doc:
>
http://backpan.perl.org/authors/id/U/UN/UNOBE/WWW-Facebook-API-v0.3.1.readme
>
>
> doesn't even work.. it says:
>
>
> Enter your public API key: XXXXXXXXXXXXXXXXXXX
> Enter your API secret: XXXXXXXXXXXXXXXXXXX
> Enter your e-mail address: clintjcl@gmail.com
> Enter your password: XXXXXXXXXXXXXXXXXXX
> Error during REST auth.createToken call:
> params =
> api_key:XXXXXXXXXXXXXXXXXXX
> call_id:1236557190.38875
> format:JSON
> method:facebook.auth.createToken
> v:1.0
> response =
> {"error_code":101,"error_msg":"Invalid API key","request_args":[{"key":"api_key","value":"XXXXXXXXXXXXXXXXXXX\r"},{"key
> ":"call_id","value":"1236557190.38875"},{"key":"format","value":"JSON"},{"key":"method","value":"facebook.auth.createToken"},{"key":
> "v","value":"1.0"},{"key":"sig","value":"20ea41af9f8d1800134d68c4e122cd99"}]}
> WWW::Facebook::API::call('WWW::Facebook::API=HASH(0x207dae0)', 'auth.createToken') called at C:/Perl/site/lib/WWW/Facebook/A
> PI/Auth.pm line 26
> WWW::Facebook::API::Auth::create_token('WWW::Facebook::API::Auth=HASH(0x20fa728)') called at C:/Perl/site/lib/WWW/Facebook/A
> PI/Auth.pm line 78
> WWW::Facebook::API::Auth::login('WWW::Facebook::API::Auth=HASH(0x20fa728)', 'email', 'clintjcl@gmail.com\x{d}', 'pass', 'XXXXXXXXXXXXXXXXXXX\x{d}') called at C:\pics\apitest.pl line 22
>
>
> where apitest.pl was simply me copying and pasting the code in.
>
> I can't get the Perl Facebook API to do.. well...anything, unfortunately.
>
> Just thought I"d let you know.
>
> -Clint
>
>
--
Clayton Scott
clayton.scott@gmail.com
