既存のxmlをcommon lispで書き換えるつまり処理した結果を上書き保存するというスクリプトを作成したいのですが、
うまくいきません

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE article PUBLIC "-//OASIS//DTD DocBook XML V4.0//EN"
"http://www.oasis-open.org/docbook/xml/4.0/docbookx.dtd">
<article>
<articleinfo>
<title>test</title><author>my @@@name!</author>
</articleinfo>
<section id="rrr">
<title>test1</title>
<p>hoge@@@foo</p>
<pre>haao@@@u</pre>
</section>
</article>

このxmlのpとpreの@@@をpiyoに書き換えたいのですが
common lisp のxml parser である cxml を使おうとしたら
"URI scheme :HTTP not supported" とエラーメッセージが表示されます

http://common-lisp.net/project/cxml/quickstart.html#id54163 の
"Can I skip loading of DTDs entirely?"どおりにやってみたのですが、
それをもとにどうすればリストを取得できるのか書いていないためわかりません

cxmlで（恥ずかしながら）処理できないなら他のライブラリを活用しようと思うのですが
pとpreの要素に限定して@@@を書き換える処理におすすめのものはありますか