p::Admin;
{
$Hadoop::Admin::VERSION = '0.4';
}
use warnings;
use Moose;
use LWP::UserAgent;
use JSON -support_by_pp;
has 'namenode' => (
is => 'ro',
isa => 'Str',
reader => 'get_nameno
Value=();
use Data::Dumper;
foreach my $hostref ( @{$self->{'JobTrackerInfo_AliveNodesInfoJson'}} ) {
push @returnValue, $hostref->{'hostname'};
}
return @returnValue;
}
sub tasktrac
;
my @returnValue=();
foreach my $hostref ( @{$self->{'JobTrackerInfo_BlacklistedNodesInfoJson'}} ) {
push @returnValue, $hostref->{'hostname'};
}
return @returnValue;
}
sub tasktrac