Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re^3: How do I use curl with perl and Twitter

by davorg (Chancellor)
on Jul 21, 2009 at 15:15 UTC ( #781988=note: print w/ replies, xml ) Need Help??


in reply to Re^2: How do I use curl with perl and Twitter
in thread How do I use curl with perl and Twitter

You're making this far harder than it needs to be.

#!/usr/bin/perl use strict; use warnings; use Data::Dumper; use Net::Twitter; my $nt = Net::Twitter->new; print Dumper $nt->show_user('davorg');

You don't even need to authenticate unless you're trying to access a user who has protected their updates.

--

See the Copyright notice on my home node.

Perl training courses


Comment on Re^3: How do I use curl with perl and Twitter
Download Code
Re^4: How do I use curl with perl and Twitter
by northwestdev (Acolyte) on Jul 21, 2009 at 17:40 UTC
    The reason why I need to authenticate, is that Twitter rate limits its non-authenticated API calls to a small number of calls every hour. Authenticated (and pre-authorized) accounts, get a much bigger allowance. I did get Net::Twitter installed, and I'm about to test it.
Re^4: How do I use curl with perl and Twitter
by northwestdev (Acolyte) on Jul 21, 2009 at 19:50 UTC
    FYI: I am a Perl newbie. It is somewhat working, but I cannot figure out why this piece of code is not producing any output:
    my $nt = Net::Twitter->new( traits => [qw/API::REST/], username => $usename, password => $pwd ); my $results = $nt->show_user($twitterID); foreach my $user (@{ $results }) { my $id = $user->{id}; my $name = $user->{name}; print STDOUT $id." ".$name."<br>"; }
    No error messages either. I know it's about the way I am accessing the $user hash. I did some perl reading, and even one of the examples in Net::Twitter uses the same code.

      This is one of those (many) places where use warnings will tell you exactly what you are doing wrong.

      Not an ARRAY reference at ./twit line 13.

      The value you're getting back in $result is a hash reference. You can't treat it as an array reference.

      Coding without use warnings is stupid. Don't do it.

      --

      See the Copyright notice on my home node.

      Perl training courses

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://781988]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (6)
As of 2014-08-23 00:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (168 votes), past polls