$chainsinifile->close();
-print Dumper @CbCommands;
-
###############################
## Do whatever has to be done
###############################
# configure Converter Boards
-my $here = cwd();
-chdir(XMLDBPATH);
+local $CWD = XMLDBPATH;
+delete $ENV{'QUERY_STRING'};
foreach my $cmd (@CbCommands){
my $entity = "CbController";
my $addr = $cmd->{addr};
my $value = $cmd->{value};
my $fieldname = $cmd->{name};
execute("./put.pl $entity $addr $fieldname $value");
-
}
-chdir($here);
local $CWD = $ENV{'JTAGPATH'};