On Thu, 2008-09-25 at 13:00 +0300, Vyacheslav Karamov wrote:
> Paolo Gianrossi пишет:
> > On Thu, 2008-09-25 at 12:03 +0300, Vyacheslav Karamov wrote:
> >
> >> Hi All!
> >>
> >> I need to parse XML with XML::Parser::Expat and make XML tree with
> >> Tree::Simple.
> >> But I need to store tag value and its attributes. But
> >> Tree::Simple->setNodeValue() accepts single scalar (value itself).
> >> How to create something like this?
> >>
> >> struct
> >> {
> >> $value;
> >> %attributes;
> >> } $nodeValue;
> >>
> >> Tree::Simple->setNodeValue( $nodeValue);
> >>
> >>
> >> The pseudo code above shows what I actually need. But I don't know how
> >> to implement it.
> >>
> >
> > Don't know about xml, but based on your code, it seems like you need a
> > reference.
> >
> > Something like
> >
> > my $nodeValue = {value=>$value, attributes=>\%attributes};
> >
> > should do the trick.
> >
> > perldoc perlreftut might give insights.
> >
> > Hope this helps
> >
> > cheers
> > paolino
> >
> >
> >
> >
> but how can I get access to attributes?
>
> print $nodeValue->{"value"}, " ", "\n" if defined
> $nodeValue->{"value"}; #ok
> print $nodeValue->{"attrubutes"}, " ", "\n" if defined
> $nodeValue->{"attrubutes"}; #fail
watch the typo!
print $nodeValue->{"attributes"}, " ", "\n" if defined
$nodeValue->{"attributes"};
paolino
>
>
--
Paolo Gianrossi
Softeco Sismat S.p.A. - R&D Division
via De Marini 1, 16149 Genova
Tel: +39 010 6026 332 - Fax: +39 010 6026 350
E-Mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
