Yet Another CPAN Grep

Net-Hadoop-HuahinManager ( T/TA/TAGOMORIS/Net-Hadoop-HuahinManager-0.03.tar.gz, TAGOMORIS, 2013; MetaCPAN )

Net-Hadoop-HuahinManager/lib/Net/Hadoop/HuahinManager.pm ( view source; MetaCPAN )

ckage Net::Hadoop::HuahinManager;

use strict;
use warnings;
use Carp;

use URI::Escape qw//;
use JSON::XS qw//;

use Furl;

our $VERSION = "0.03";

sub new {
    my ($this, %opts) = @_;
    croak "Hu

 if ($code == 200) {
        if ($content_type =~ m!^application/json! and length($body) > 0) {
            return JSON::XS::decode_json($body);
        }
        return 1;
    }
    # error
    carp