Yet Another CPAN Grep

WebService-MtGox ( B/BE/BEPPU/WebService-MtGox-0.05.tar.gz, BEPPU, 2011; MetaCPAN )

WebService-MtGox/lib/WebService/MtGox.pm ( view source; MetaCPAN )

package WebService::MtGox;
use 5.008;
use Moo;
use Ouch;
use JSON;
use LWP::UserAgent;

our $VERSION  = '0.05';
our $BASE_URL = 'https://mtgox.com/code';

has user     => (is => 'ro');
has password =>

icker.php";
  my $json = $self->ua->get($url)->content();
  decode_json($json);
}

sub get_depth {
  my $self = shift;
  my $url  = $self->base_url . "/data/getDepth.php";
  my $json = $self->ua->get(

t();
  decode_json($json);
}

sub get_trades {
  my $self = shift;
  my $url  = $self->base_url . "/data/getTrades.php";
  my $json = $self->ua->get($url)->content();
  decode_json($json);
}

sub get_