Yet Another CPAN Grep

YARN ( A/AO/AOSSAMA/YARN.tar.gz, AOSSAMA, 2015; MetaCPAN )

YARN/lib/YARN.pm ( view source; MetaCPAN )

# TODO: Write better/more test cases

use 5.006;
use strict;
use warnings;

use REST::Client;
use JSON;

use Data::Dumper;

use YARN::YarnClient;

BEGIN {
	$YARN::VERSION = '0.1';
}

our $client = '';

path( $self, $api ) )->responseContent();
	
	if (defined $element) {
		return $self->findElementInJSON( $rest, $apis{$api}, $element );
	} else {
		return $rest;
	}
}

sub info		{ shift->__req_api( 'i

f = shift;
	
	my $req = $self->scheduler();
}

sub findElementInJSON {
	my ($self, $rest, $root, $element) = @_;
	
	my $res = decode_json $rest;
	
	return $res->{$root}->{$element};
}

=head1 NAME

YA