Valeu Gabriel, obrigado...


Ricardo Stock
www.stocksistemas.com.br

----- Original Message ----- From: "Gabriel Vieira" <[email protected]>
To: <[email protected]>
Sent: Thursday, June 06, 2013 11:52 AM
Subject: Re: [SP-pm] Ler XML


----------------8<----------------
use XML::XPath;
use XML::XPath::XMLParser;

my $xp = XML::XPath->new(ioref => *DATA);
my $nodeset = $xp->find('//foto[@imagem]');
my $node = $nodeset->get_node(0);
print $node->getAttribute('imagem');

__DATA__
<xml>
<nome>jose</nome>
<idade>50</idade>
<bla>blablabla</bla>
<foto imagem='foto.jpg'/>
</xml>
---------------->8----------------

2013/6/6 Ricardo Stock <[email protected]>:
Bom dia a todos. Estou tendo um problema ao tentar retornar o valor de uma
tag na leitura de um xml.

Veja tenhos os seguintes dados por exemplo

<nome>jose</nome>
<idade>50</idade>
<bla>blablabla</bla>
<foto imagem='foto.jpg'/>

Minha duvida esta em como pegar o valor do atributo imagem

estou utilizando  XML::XPath com use LWP::Simple

$foto=$xpath->findvalue('foto/imagem',$context);

porém $foto esta retornando vazio.

Qual seria a sintaxe correta para retornar este atributo ?

Obrigado

Ricardo Stock
www.stocksistemas.com.br

=begin disclaimer
   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
 SaoPaulo-pm mailing list: [email protected]
 L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer




--
Gabriel Vieira
=begin disclaimer
  Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer
=begin disclaimer
  Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
SaoPaulo-pm mailing list: [email protected]
L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer

Responder a