dfreedm

#!/usr/bin/perl
use strict;
use warnings;
use JSON::DWIW;
use LWP::Simple;
my $json     = JSON::DWIW->new;
my $username = shift @ARGV;
die "Need a username!\n" unless $username;
my $twitter =
  "http://api.twitter.com/1/statuses/followers.json?screen_name=$username";