PrettyPrint 文档指出:“评论和处理指令默认是紧凑的,但您可以通过将适当的回调传递给构造函数来内联或阻止特定的评论或 PI。”
但是,我找不到任何关于如何在内联处理指令周围保留空格的示例。
到目前为止,这是我的代码:
my $pp = XML::LibXML::PrettyPrint->new(
indent_string => " ",
element => {
inline => [qw/footnoteref span strong em b i a bold bdit ital monetary/],
compact => [qw/title subtitle productid expandlevel ClientID JobID JobName Client City State Zip PoprangeID ClassificationID BudgetMonth li dd dt th td rule/],
preserves_whitespace => [qw/banner pre script style/],
}
);
样本输入:
<para id="para_11" justify="center" block_type="block">
<bold>"NEW PAGE" <?xpp co;Red;Yellow?>RED on YELLOW<?xpp coend?> Testing 'eop' after an image</bold>
</para>