2013-09-10 3 views
-1

Я использую связанный API для доступа к профилю пользователя.Доступ к строковому значению XML

my $profile_xml = $li->request(
    request_url   => 'http://api.linkedin.com/v1/people/~:(id)', 
    access_token  => $access_token->{token}, 
    access_token_secret => $access_token->{secret}, 
); 

profile_xml разобрана и поместить в самосвале данных и распечатаны

$VAR1 = [ 'person', [ {}, 0, ' ', 'id', [ {}, 0, 'bEdS5KlaV7' ], 0, ' ' ] ]; 

выше значение получается из XML-строки с помощью дампера данных. Я хочу получить доступ к id bEdS5KlaV7. Как я могу получить доступ к id и хранить в одной переменной для процесса.

+0

Что Perl модуль вы используете в своем назначении на '$ profile_xml'? – toolic

+0

Возможные дубликаты того же пользователя: http://stackoverflow.com/questions/18717426/accesing-the-xml-string-values ​​ http://stackoverflow.com/questions/18711097/retrieve-values-from-the- reponse-xml-by-getgetelementbythetagname http://stackoverflow.com/questions/18670193/how-to-print-the-profile-details-individual-lines –

ответ

0
use warnings; 
use strict; 

my $VAR1 = [ 'person', [ {}, 0, ' ', 'id', [ {}, 0, 'bEdS5KlaV7' ], 0, ' ' ] ]; 
print $VAR1->[1]->[4]->[2], "\n"; 

__END__ 

bEdS5KlaV7 

Смотрите также: perldoc perldsc

+1

его работающий штраф теперь так продолжает мою работу, спасибо большое. –

+0

Можете ли вы рассказать три позиции массива в приведенном выше var1, потому что я хочу добавить некоторые другие поля. –

+0

Я не понимаю вашего комментария. – toolic

Смежные вопросы