如何使用Perl'；简单模块？

我有一份表格

my $hash = {
    'Key' => "ID1",
    'Value' => "SomeProcess"
};

我需要将其转换为表单的XML片段

<Parameter key="ID1">Some Process a</Parameter> 
<Parameter key="ID2">Some Process b</Parameter> 
<Parameter key="ID3">Some Process c</Parameter>

某个进程
一些过程b
一些过程c

---

如何做到这一点？

首先，您的示例不是有效的XML文档，因此XML:：Simple需要进行一些修改才能输出它。它似乎希望输出文档，而不是那么多的片段。但我能够用这种结构生成输出：

my $xml
    = {
        Parameter => [
          { key => 'ID1', content => 'Some Process a' }
        , { key => 'ID2', content => 'Some Process b' }
        , { key => 'ID3', content => 'Some Process c' }
        ]
    };


print XMLout( $xml, RootName => '' ); # <- omit the root

---

首先，您的示例不是一个有效的XML文档，因此XML:：Simple需要进行一些操作才能输出它。它似乎希望输出文档，而不是那么多的片段。但我能够用这种结构生成输出：

my $xml
    = {
        Parameter => [
          { key => 'ID1', content => 'Some Process a' }
        , { key => 'ID2', content => 'Some Process b' }
        , { key => 'ID3', content => 'Some Process c' }
        ]
    };


print XMLout( $xml, RootName => '' ); # <- omit the root

---

谢谢阿克斯曼。。假设我有一些值，一些值，一些值，一些值，一些值，一些值，在这种情况下，我的理解是，这是根节点。我说得对吗？我该怎么做。。？谢谢again@MarsMax：是的

XMLout（$xml，RootNode=>Parameters'）

谢谢Axeman。。假设我有一些值，一些值，一些值，一些值，一些值，一些值，在这种情况下，我的理解是，这是根节点。我说得对吗？我该怎么做。。？谢谢again@MarsMax：Yeah

XMLout（$xml，RootNode=>Parameters'）

$xml = { Parameter => [] };
push( @{ $xml->{Parameter} }
    , { key => $hash->{Key}, content => $hash->{Value} }
    );