Yet Another CPAN Grep

HTCondor-Queue-Parser ( S/SA/SAMIRCURY/HTCondor-Queue-Parser-0.04.tar.gz, SAMIRCURY, 2014; MetaCPAN )

HTCondor-Queue-Parser/lib/HTCondor/Queue/Parser.pm ( view source; MetaCPAN )

package HTCondor::Queue::Parser;

use strict;
use warnings;
use XML::Simple;
use JSON::XS;

# ABSTRACT: parses multible schedds condor_q output, so you don't have to. Serves output in many formats.

XMLin($xml);
		$schedds_map{$schedd}{'href'} = $job_data;	
	}
	return %schedds_map;
}

sub schedd_json {
	my $self = shift;
	my $schedds_map_href = shift;
	my $schedd = shift;
	my %schedds_map = %{$sc

chedds_map{$schedd}{'href'};
	my $coder = JSON::XS->new->ascii->pretty->allow_nonref;
	my $json = $coder->encode($schedds_map{$schedd}{'href'});
	return $json;
}


1;


__END__

=pod

=head1 NAME

HTC