采用HTTP basic认证,如下所示:
my $browser = LWP::UserAgent->new();
$browser->credentials( 'twitter.com:80', 'Twitter API', ARGS{email}, $ARGS{password} );
my $response = $browser->get('http://twitter.com/account/verify_credentials.json');
采用HTTP basic认证,如下所示:
my $browser = LWP::UserAgent->new();
$browser->credentials( 'twitter.com:80', 'Twitter API', ARGS{email}, $ARGS{password} );
my $response = $browser->get('http://twitter.com/account/verify_credentials.json');