데이터 구조 및 perl의 xml 테스트

Question

도구가 있습니다.
여러 데이터 구조를 XML로 변환합니다. XML :: Element를 사용하여 데이터 구조를 XML로 변환합니다.
2. XML을 데이터 구조로 변환합니다. 저는 XML :: TreeBuilder를 사용하여 XML을 데이터 구조로 변환합니다.

이 도구에 대한 단위 테스트를 작성해야합니다.
1. 데이터 구조의 XML 변환을 테스트하기 위해 Test :: XML :: XPath 모듈의 함수를 사용하여 XML 테스트를 수행합니다. 예 : like_xpath 기능.
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);