#! /usr/local/bin/perl

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

$file=$ARGV[0];

$mdsModify = "$BINDIR/grid-info-modify";
$mdsCreate = "$BINDIR/grid-info-create";
system "$mdsCreate -w WWWadmin -f $file -d";
system "$mdsModify -c -a -D \"cn=Directory Manager, o=Globus, c=US\" -w WWWadmin -h mds.globus.org -p 389 -f mds_input.ldif";


