my($TaxId) = $DocSum->findnodes('./Item[@Name="TaxId"]'); print OUTFILE $TaxId->to_literal, "\t";