From e76b691e78e273226cba9284cb8cd22a423319ed Mon Sep 17 00:00:00 2001
From: Jules Laplace <carbon@melanarchy.org>
Date: Fri, 2 Aug 2013 17:23:25 -0500
Subject: bucky2

---
 bucky2/rest/topsy-display.pl | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100755 bucky2/rest/topsy-display.pl

(limited to 'bucky2/rest/topsy-display.pl')

diff --git a/bucky2/rest/topsy-display.pl b/bucky2/rest/topsy-display.pl
new file mode 100755
index 0000000..88d4976
--- /dev/null
+++ b/bucky2/rest/topsy-display.pl
@@ -0,0 +1,12 @@
+#!/usr/bin/perl
+use lib "../lib";
+use Rest::Topsy;
+my $topsy = new Rest::Topsy;
+$topsy->url('http://twitter.com/dailyrotten');
+my $entries = $topsy->topsy_load;
+
+foreach my $entry (sort { $b->{'total'} <=> $a->{'total'} } @$entries)
+	{
+	print $entry->{'total'} ."\t".$entry->{'date'}. "\t" . $entry->{'description'} ."\n";
+	}
+
-- 
cgit v1.2.3-70-g09d2