Skip to content

Instantly share code, notes, and snippets.

@s-aska
Created March 24, 2011 04:40
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save s-aska/884589 to your computer and use it in GitHub Desktop.
Save s-aska/884589 to your computer and use it in GitHub Desktop.
Twitter URL API
#!/usr/bin/env perl
use WebService::Simple;
print WebService::Simple->new(
base_url => 'http://urls.api.twitter.com/1/urls/count.json',
response_parser => 'JSON'
)->get( { url => shift } )->parse_response->{count}, "\n";
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment