Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

executable file 21 lines (15 sloc) 0.386 kb
#!/usr/bin/env perl
use strict;
use warnings;
use Net::Topsy;
=head1 SYNOPSIS
perl -Ilib examples/trending.pl
Returns the top 25 trending terms, with links.
=cut
my $topsy = Net::Topsy->new;
my $search = $topsy->trending( { perpage => 25 });
my $iter = $search->iter;
while ($iter->has_next) {
my $item = $iter->next;
printf "%-20s %s\n", $item->{term}, $item->{url};
}
Jump to Line
Something went wrong with that request. Please try again.