用perl测试数据结构和xml

Question

我有一个工具：

1.将几个数据结构转换为XML。我使用XML：：元素将数据结构转换为XML。

2.将XML转换为数据结构。我使用XML::TreeBuilder将XML转换为数据结构。

我需要为这个工具编写单元测试。

为了测试数据结构到的转换，我使用Test:: XML ::XPath模块中的函数执行

1. 测试。例如- like_xpath function .
2. 为了测试XML到数据结构的转换，我使用了Test::Deep.

中的cmp_deeply函数。

测试数据结构和XML的正确方法吗？

还是我漏掉了什么？

PS。

这是我第一次使用perl进行单元测试。

Answer 1

也许我的想法很简单，但这似乎是一种情况，在这种情况下，最好是测试总体情况，而不是担心两者之间的细节。下面是一个示意图的例子：

my $orig_data_structure = ...

my $xml = data_to_xml($orig_data_structure);
my $new_data_structure = xml_to_data($xml);

my $msg = 'The round trip should leave the data unchanged.';
cmp_deeply($new_data_structure, $orig_data_structure, $msg);