$pXML->{bookstore}{book}[3]->appendText(", The");
my @books = $pXML->('//book');
$node->('/bookstore/book[price>35]/price')->setData(24.95);