Как извлечь некоторые XML-данные из URL с помощью XML :: Twig?

Question

Я хочу получить конкретную строку, например 123 в <, полученную> 123 </полученную от часть XML, которая будет извлекаться из URL-адреса.

меня написать код, но застрял с сообщением об ошибке:

Попытка благословить в ссылку на /usr/share/perl5/XML/Twig.pm линии 392.

Как я могу это решить?

Код:

use XML::Twig; 
use LWP::Simple; 

my $url = 'http://192.168.1.205:13000/status.xml'; 
my $twig = new XML::Twig(TwigRoots => { 
'smsc/received' => sub {$author = $_[1]->text; }}); 
$twig->nparse($url); 
$twig->print; 

Answer 1

nparse заботится о new для вас (отсюда «N»), что вы хотите в этом случае, вероятно, xparse, или просто дайте модуль понять это и сделать это:

my $url= 'http://192.168.1.205:13000/status.xml'; 
my $twig= XML::Twig->parse(twig_roots => 
           { 'smsc/received' => sub { $author= $_[1]->text;}}, 
          $url 
          ); 
$twig->print; # I am not sure why you print the twig instead of just $author 

Answer 2

Появляется ошибка в nparse метод, потому что если вы замените эту строку с:

$twig->parse(LWP::Simple::get($url)); 

Тогда вы должны найти его отлично работает (или это делает когда я попробую).

/I3az/