【发布时间】:2010-05-19 05:25:18
【问题描述】:
在这个例子中,我得到时间'96'。是否存在我需要 XML::LibXML-Number-object 来实现目标的可能情况?
#!/usr/bin/env perl
use warnings; use strict;
use 5.012;
use XML::LibXML;
my $xml_string =<<EOF;
<?xml version="1.0" encoding="UTF-8"?>
<filesystem>
<path>
<dirname>/var</dirname>
<files>
<action>delete</action>
<age units="hours">10</age>
</files>
<files>
<action>delete</action>
<age units="hours">96</age>
</files>
</path>
</filesystem>
EOF
#/
my $doc = XML::LibXML->load_xml( string => $xml_string );
my $root = $doc->documentElement;
my $result = $root->find( '//files/age[@units="hours"]' );
$result = $result->get_node( 1 );
say ref $result; # XML::LibXML::Element
say $result->textContent; # 96
$result = $root->find ( 'number( //files/age[@units="hours"] )' );
say ref $result; # XML::LibXML::Number
say $result; # 96
【问题讨论】:
-
您能否阐明您要达到的目标,或许可以举一个较小的例子说明哪里出了问题?
-
在这种情况下它不会出错 - 我正在搜索一个带有 XML::LibXML::Number-object 的示例,它可以说服我,需要 XML:: LibXML::Number-object。
标签: perl xml-libxml