XML::XPath - 要素の検索

[Perl]

XML::XpathはXML::Parserを基盤としたモジュールで、XMLより特定の要素情報を抜き出すのに使用される。

[使用例]
#!/usr/bin/perl


use XML::Xpath;


my $file = 'test.xml';


#ファイルを読み込む場合はfilenameを、stringを読み込む場合にはxmlを指定
my $xp = XML::XPath->new(filename=>$file);


#取り出したい情報を問合せる
my $nodeset = $xp->find('//PurchaseUrl');


if ( my @nodelist = nodeset->get_nodelist ) {
	#string_valueメソッドにて要素内のテキストを抽出
	my @matches = map($_->string_value, @nodelist);
	print @matches;
}


else {
	print "マッチする要素はありませんでした。\n";
}

---

---