#! /usr/local/bin/perl

$BINDIR="/soft/pub/bin";

$file=$ARGV[0];

print "WARNING: Prototype\n";

$mdsSearch = "$BINDIR/grid-info-search";

#
#backup organizations
#
system "$mdsSearch -L -D \"cn=Directory Manager, o=Globus, c=US\" -w WWWadmin -h mds.globus.org -p 389 \"(&(|(objectclass=GlobusOrganization)(objectclass=GlobusOrganizationalUnit))(backup=yes))";

#
#backup resource managers
#

#
# eliminate dynamic attributes
#

# scheduledJob
# cpuload1
# cpuload5
# cpuload15
# gloperf stuff
