Skip to content

Instantly share code, notes, and snippets.

@wata
Created June 19, 2011 07:51
Show Gist options
  • Save wata/1033901 to your computer and use it in GitHub Desktop.
Save wata/1033901 to your computer and use it in GitHub Desktop.
use JSON;
use Furl::HTTP;
my $ua = Furl::HTTP->new;
my (undef, $code, undef, undef, $body) = $ua->get('http://localhost:10041/d/status');
my $status = decode_json($body);
print $status->{uptime};
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment