#!/usr/bin/perl
use lib "$ENV{PWD}/";
use lib "$ENV{NORDUGRID_LOCATION}/libexec";
use lib "/opt/nordugrid/libexec";
use strict;
use warnings;
use find_lrms;

# Simple script to access perl parser module from shell scripts to unify parsing.
# Please note that this script requires the infosys perl module find_lrms.pm

my $lrms = &find_lrms::read_lrms();
if($lrms) {
	print("$lrms\n");
} else {
	# Fall back to pbs if find_lrms fails somehow
	print("$pbs\n");
}
exit 0;
