#! /usr/bin/env perl
use strict;

if ($#ARGV == -1) {
    die " ERROR swav.buildnml: must specify a caseroot input argument";
}
my ($CASEROOT) = @ARGV;
chdir "${CASEROOT}";

my $RUNDIR = `./xmlquery  RUNDIR -value`;

chdir "$RUNDIR";

# nothing to do for stubs




