perl - XMLout() で一重引用符を強制する

Question

属性に二重引用符の代わりに単一引用符を強制的に使用XMLout()する簡単な方法はありますか? XML::Simple適切なオプションが見つかりませんでした (または見逃してしまいました...)。

<Object Alias="12345" Inherit="1" Position="0">

する必要があります

<Object Alias='12345' Inherit='1' Position='0'>

これは慣習の問題であり、特別な理由はありません。また、内側の引用符はすべてエスケープされるため、競合することはありません。

Answer 1

なぜこれをしたいのですか？それが役に立つ正当な理由がわかりません?! xml out を使用して xml ファイルを印刷し、再度開くことができます。while(<>){s/\"/\'/g;}