Come accedere ai metodi autenticati dell'API di StackExchange da uno script perl?

Question

Sto usando WWW :: Mechanize. Per i metodi che non richiedono l'autenticazione, ottengo quelli come farebbe con qualsiasi altro URL, e quindi utilizzare il modulo Perl JSON per analizzare fuori qualsiasi dato che voglio:

my $response = $mech->get('http://api.stackexchange.com/1.1/questions?fromdate=' . $lasthour) 
my $q = from_json($response->content()) 

ho usato Mechanize per accedere a siti web in passato, ma la roba di Oauth è fonte di confusione e che cosa suggerisce lo documentation is provided for using the API è destinato alle applicazioni Web (che richiedono la registrazione con StackExchange?).

In particolare, sono interessato allo notifications method anche se mi aspetto che il codice corretto consenta l'accesso a uno dei metodi richiesti dall'autenticazione.

Answer 1

Hai guardato Net::StackExchange2?

#for methods that require auth. 
my $se = Net::StackExchange2->new(
    { 
     site=>"stackoverflow", 
     access_token => '<THE ACCESS TOKEN>' , 
     key => '<YOUR APP KEY>' 
    } 
); 

Utilizza LWP :: UserAgent. Anche se non si desidera utilizzare direttamente il modulo Net :: StackExchange2, si ha una buona possibilità di trovare qualche buon codice di esempio da prendere in prestito.