Sélection de la valeur avec la commande Linux xpath (à partir de Perl)

Question

Je souhaite extraire un attribut d'un arbre XML. Pour cela, j'utilise la commande xpath du paquetage libxml-xpath-perl. Je me suis dit cette commande:

virsh dumpxml save | xpath -e "/domain/devices/disk[@type='file']/source/@file[1]" 

Cela me donne

file="/var/lib/libvirt/images/save.raw" 

Comment puis-je sélectionner la valeur uniquement? (/var/lib/libvirt/images/save.raw)

Merci

Falstaff

Answer 1

J'utilise (peut-être parce que je l'ai écrit; -) xml_grep2, de App::xml_grep2, qui a une option -t pratique qui renvoie la valeur texte du résultat:

virsh dumpxml save | xml_grep2 -t "/domain/devices/disk[@type='file']/source/@file[1]" 

devrait fonctionner

Answer 2

Vous voulez séparer la chaîne en fonction de la =, utilisez donc split (perldoc -f split):

my ($attr, $value) = split /=/, 'file="/var/lib/libvirt/images/save.raw"'; 

Toutefois, au lieu d'analyser ces valeurs littéralement, vous devez utiliser les nombreuses bibliothèques d'analyseurs XML, telles que XML::XPath.

Answer 3

/domain/devices/disk[@type='file']/source/@file[1]/text() 

Answer 4

Je pense que retourner uniquement la valeur est un comportement normal. Peut-être que c'est un bug? J'ai essayé /text() comme Tomalak suggéré et il ne retourne rien (au moins avec cet outil).
Vous pourriez maintenant redirigez la sortie dans une autre commande comme sed pour obtenir le résultat souhaité:

... | sed -r 's/.*?"(.*)"/\1/' 

Edit:
Apparemment, le script Perl utilise XML::XPath et utilise uniquement find pour la requête qui retourne un objet NodeSet . Mais il y a aussi findvalue que le script n'utilise pas. Peut-être que vous pourriez bidouiller un peu avec le script. Remplacer seulement find par findvalue donne juste la valeur sur stdout, mais aussi les messages d'erreur sur stderr.
Doc pour la bibliothèque: https://metacpan.org/pod/XML::XPath