printf(" <Unc>\n  <ProcessArea name=\"%s\">\n", $box);
printf("  </ProcessArea>\n </$area>\n");
printf while <COXML>  ;