use strict; use warnings; use XML::Twig; my $xmlStr = <<XML; <item name="pdf_link"> <value>http://www.yahoo.com</value> </item> XML my $twig= XML::Twig->new( twig_handlers => { item => \&item } ); $twig->parse($xmlStr); sub item { my ($twig, $item) = @_; if ($item->att('name') eq 'pdf_link') { print $item->first_child('value')->text(), "\n"; } } __END__ http://www.yahoo.com
In reply to Re: regex matching issue (XML parse)
by toolic
in thread regex matching issue
by rahulgsp83
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |