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. |