Subject: | I get a 403 error every time I try do any operation after auth |
I ran the basic script below:
#!/usr/bin/perl -w
#
#
use Net::Dropbox::API;
use strict ;
use constant { DROPBOX_API_KEY => 'xxxxxxxxxxxxxxxxxx' ,
DROPBOX_SECRET => 'yyyyyyyyyyyyyyyyyyy ' ,} ;
my $box = Net::Dropbox::API->new({key=> DROPBOX_API_KEY,
secret => DROPBOX_SECRET });
$box->callback_url("");
$box->debug(1);
my $authLink = $box->login() ;
#Get the authentication link
$authLink =~ s/\&oauth\_callback\=// ;
print "AuthLink: \n" . $authLink . "\n" ;
readline(*STDIN);
#Autheticate this script
$box->auth();
my $accountInfo = $box->account_info() ;
---
I always get this type of output
output
Got Request Token hhhhhhhhhhhh
Got Request Token Secret sssssssssssssssssss
AuthLink:
https://www.dropbox.com/0/oauth/authorize?oauth_token=hhhhhhhhhhhhhhhhh
Got Access Token tttttttttttttttttt
Got Access Token Secret qqqqqqqqqqqqqqqq
Something went wrong: 403 Forbidden at
/usr/share/perl5/Net/Dropbox/API.pm line 461, <STDIN> line 1.