dda has asked for the wisdom of the Perl Monks concerning the following question:
Hello all.
I'm trying to use XML::Generator::PerlData module, and I can't generate attribute=value pair:
As you see, attribute and value passed to start_tag generate {}attr1="HASH(0x1f0bb00)", and the call to $pd->attrmap(entry => ['attr2']), supposed to add attr2="value2"pair inside entryelement just hides attr2 at all.#!/usr/bin/perl -w use strict; use XML::Generator::PerlData; use XML::Handler::YAWriter; use IO::File; my $handler = XML::Handler::YAWriter->new( Output => new IO::File (">-"), Pretty => { PrettyWhiteIndent => 1, PrettyWhiteNewline => 1, CompactAttrIndent => 1 }); my $pd = XML::Generator::PerlData->new(Handler => $handler); $pd->attrmap(entry => ['attr2']); $pd->parse_start(); $pd->start_tag('entry', attr1 => 'value1'); my $href; $href->{path} = 'path'; $href->{attr2} = 'value2'; $pd->parse_chunk($href); $pd->end_tag('entry'); $pd->parse_end(); _OUTPUT_ <?xml version="1.0" encoding="UTF-8"?> <document> <entry {}attr1="HASH(0x1f0bb00)"> <path>path </path> </entry> </document>
What's wrong with it? Please help me.
--dda
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: XML::Generator::PerlData and attributes
by jeffa (Bishop) on Oct 14, 2003 at 13:07 UTC | |
by dda (Friar) on Oct 14, 2003 at 13:29 UTC | |
by jeffa (Bishop) on Oct 14, 2003 at 13:36 UTC | |
Re: XML::Generator::PerlData and attributes
by Matts (Deacon) on Oct 19, 2003 at 12:53 UTC | |
Re: XML::Generator::PerlData and attributes
by mirod (Canon) on Oct 15, 2003 at 10:44 UTC |
Back to
Seekers of Perl Wisdom