http://www.perlmonks.org?node_id=781988


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

Replies are listed 'Best First'.
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