This shows you the differences between two versions of the page.
Both sides previous revision Previous revision | Next revision Both sides next revision | ||
язык_программирования_perl [2019/09/24 12:42] val [Пример 2] |
язык_программирования_perl [2019/10/11 10:31] val [Пример 4] |
||
---|---|---|---|
Line 201: | Line 201: | ||
foreach my $node (@nodes) { | foreach my $node (@nodes) { | ||
+ | |||
+ | # print $node->toString; | ||
+ | | ||
my $uuid = $node->getAttributeNode ("uuid")->getValue; | my $uuid = $node->getAttributeNode ("uuid")->getValue; | ||
my $lastname = $node->getAttributeNode ("lastname")->getValue; | my $lastname = $node->getAttributeNode ("lastname")->getValue; | ||
Line 208: | Line 211: | ||
} | } | ||
</code> | </code> | ||
- | |||
==== Пример 5 ==== | ==== Пример 5 ==== | ||