if($xref->att('keyref')){
 my($h) = $linktext{$xref->att('keyref')};
 my($count);
 foreach my $i (@$h){
  $count++;
  print "child $count:\n";
  $i->print;
  print $/;
  $xref->copy->paste(last_child=>$i);
 } 
$xref->print;
}