Как запросить eXist с помощью XPath? - PullRequest
2 голосов
/ 23 мая 2011

Я решил использовать eXist в качестве базы данных для приложения, которое я пишу на Perl, и я экспериментирую с ним.Проблема в том, что я сохранил XML-документ со следующей структурой

<foo-bar00>
    <perfdata datum="GigabitEthernet3_0_18">
        <cli cmd="whatsup" detail="GigabitEthernet3/0/18" find="" given="">
            <input_rate>3</input_rate>
            <output_rate>3</output_rate>
        </cli>
    </perfdata>
    <timeline>2011-5-23T11:15:33</timeline>
</foo-bar00>

и он находится в коллекции "/db/LAB/foo-bar00/2011/5/23/11_15_33.xml".

Я могу успешно запросить его, например:

my $xquery = 'doc("/db/LAB/foo-bar00/2011/5/23/11_15_33.xml")' ;

или $xquery может быть равно = doc("/db/LAB/foo-bar00/2011/5/23/11_15_33.xml")/foo-bar00/perfdata/cli/data(output_rate) или = doc("/db/LAB/foo-bar00/2011/5/23/11_15_33.xml")/foo-bar00/data(timeline)

my ($rc1, $set) = $eXist->executeQuery($xquery) ;
my ($rc2, $count) = $eXist->numberOfResults($set) ;
my ($rc3, @data) = $eXist->retrieveResults($set) ;
$eXist->releaseResultSet($set) ;
print Dumper(@data) ;

И результат:

$VAR1 = {
  'hitCount' => 1,
  'foo-bar00' => {
    'perfdata' => {
      'cli' => {
        'given' => '',
        'detail' => 'GigabitEthernet3/0/18',
        'input_rate' => '3',
        'cmd' => 'whatsup',
        'output_rate' => '3',
        'find' => ''
      },
      'datum' => 'GigabitEthernet3_0_18'
    },
    'timeline' => '2011-5-23T11:15:33'
  }
};

---> Учитывая, что я знаю XML-документ, из которого я хочу получить информацию.---> Учитывая, что я хочу получить информацию о временной шкале.

Когда я пишу:

my $db_xml_doc = "/db/LAB/foo-bar00/2011/5/23/11_15_33.xml" ;
my ($db_rc, $db_datum) = $eXist->queryXPath("/foo-bar00/timeline", $db_xml_doc, "") ;
print Dumper($db_datum) ;

Результат:

$VAR1 = {
  'hash' => 1717362942,
  'id' => 3,
  'results' => [
    {
      'node_id' => '1.2',
      'document' => '/db/LAB/foo-bar00/2011/5/23/11_15_33.xml'
    }
  ]
};

Вопрос: Как я могу получить информацию о «временной шкале»?Кажется, переменная "node_id" (= 1.2) может указывать на информацию о временной шкале, но как я могу ее использовать?

Спасибо.

Ответы [ 2 ]

0 голосов
/ 07 августа 2012

Не знаю, если вы все еще заинтересованы, но вы можете либо извлечь документ как DOM и применить xquery к DOM, или, что еще лучше, извлечь только ту информацию, которая вам нужна в запросе, который вы отправляетесервер.

Примерно так:

for $p in doc("/db/LAB/foo-bar00/2011/5/23/11_15_33.xml")//output_rate
return
    <vlaue>$p</value>
0 голосов
/ 23 мая 2011
use XML::LibXML qw( );

my $parser = XML::LibXML->new();
my $doc    = $parser->parse_file('a.xml');
my $root   = $doc->documentElement();

my ($timeline) = $root->findnodes('timeline');
if ($timeline) {
    print("Exists: ", $timeline->textContent(), "\n");
}

или

my ($timeline) = $root->findnodes('timeline/text()');
if ($timeline) {
    print("Exists: ", $timeline->getValue(), "\n");
}

Я мог бы использовать /foo-bar00/timeline вместо timeline, но я не видел необходимости.

...