Beefy Boxes and Bandwidth Generously Provided by pair Networks Cowboy Neal with Hat
Perl Monk, Perl Meditation
 
PerlMonks  

XML::Twig

by matth (Monk)
on Dec 09, 2002 at 19:34 UTC ( #218634=perlquestion: print w/ replies, xml ) Need Help??
matth has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks,

The code shown in Re: Removing duplicate subtrees from XML works very well with the data shown in this posting. But with my data (as below)

<species name = "hs"> <sequence id = "1" title = "chromosome 1"> <genome_feature type = "CDS"> <gene id = "01"> <gene_seq number = "1"></gene_seq> </gene> </genome_feature> </sequence> </species> <species name = "hs"> <sequence id = "1" title = "chromosome 1"> <genome_feature type = "CDS"> <gene id = "17"> <gene_seq number = "2"></gene_seq> </gene> </genome_feature> </sequence> </species>
I get the following error messages:
bash-2.05$ perl perl_monks_F.pl sorted doc generation NOK: expected: <species name = "hs"> <sequence id = "1" title = "chromosome 1"> <genome_feature type = "CDS"> <gene id = "17"> <gene_seq number = "2"></gene_seq> </gene> </genome_feature> </sequence> </species> found: <species name="hs"> <sequence id="1" title="chromosome 1"> <genome_feature type="CDS"> <gene id="01"> <gene_seq number="1"></gene_seq> </gene> </genome_feature> </sequence> </species> Use of uninitialized value in substitution (s///) at perl_monks_F.pl l +ine 143, <DATA> chunk 2. Use of uninitialized value in substitution (s///) at perl_monks_F.pl l +ine 144, <DATA> chunk 2. Use of uninitialized value in substitution (s///) at perl_monks_F.pl l +ine 145, <DATA> chunk 2. Use of uninitialized value in string eq at perl_monks_F.pl line 50, <D +ATA> chunk 2. Use of uninitialized value in concatenation (.) or string at perl_monk +s_F.pl line 56, <DATA> chunk 2. merged doc generation NOK: expected: found: <species name="hs"> <sequence id="1" title="chromosome 1"> <genome_feature type="CDS"> <gene id="01"> <gene_seq number="1"></gene_seq> </gene> </genome_feature> </sequence> </species> bash-2.05$

Alterations that I made to the provided script were the addition of a few ErrorContext => 1 statements. And I have tested these slight alterations with the data used in the top posting link.

Comment on XML::Twig
Select or Download Code
Re: XML::Twig
by matth (Monk) on Dec 09, 2002 at 23:14 UTC

    I was so focused on the problem that I forgot to ask if anyone could point out the structural difference between the XML data in the above posting and the XML data for mirod's code in Re: Removing duplicate subtrees from XML.

Re: XML::Twig
by matth (Monk) on Dec 10, 2002 at 01:04 UTC
    I am now doing some debugging work which is finding some obvious answers. I will come back with a report on how to alter the script in question. Hold on everyone.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://218634]
Approved by strider corinth
Front-paged by tye
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (12)
As of 2014-04-17 11:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (446 votes), past polls