Perl에서 어떻게 단위 테스트를 할 수 있습니까?

Perl에서 어떻게 단위 테스트를 할 수 있습니까?

---

저는 OO Perl 프로그래밍을 해왔고 궁금합니다. 단위 테스트를 수행하는 가장 좋은 방법은 무엇입니까?

지금까지 테스트 를 수행하기 위해 Test :: Simple 모듈을 사용해 왔지만 내가 원하는 것에 충분하지 않다고 느낍니다.

이에 대한 멋진 모듈을 알려 주시겠습니까?

---

Test::MorePerl 테스트를 더 진행 하기 전에 픽업에 투표를 추가하겠습니다 . 펄 테스트 커뮤니티는 매우 잘 주위에 단결 테스트 뭐든지 프로토콜 , 그리고 당신과 함께 놀러 할 것입니다 Test::More작동 및 도구와 같은 방법을 방법을 이해 prove하고 Test::Harness::Archive할 수 도움말을 자동화하는 테스트를 배포 할 수 있습니다.

"바로 뛰어 Test::Class들고 " 싶다면 xTest 시설에 TAP 백엔드를 제공 한다고 생각 합니다 . 나는 그것을 전혀 사용하지 않았지만 (저는 Test::More사람입니다) 매우 높은 평가를 받았습니다 .

---

Test :: More는 Test :: Simple의 요령을 이해하면 더 많은 돈을 벌 수 있습니다.

또한 더 많은 정보를 원하면이 이전 토론을 참조 할 수 있습니다. how-can-i-implement-tdd-in-perl

---

melaos 답변에 대한 귀하의 의견으로 판단하면 Test :: Class 또는 Test :: Unit 이 찾고있는 것입니다.

---

간단한 테스트 예 :

#!/usr/bin/perl -w

use strict;
use warnings 'all';
use Test::More plan => 4;  # or use Test::More 'no_plan';

use_ok('My::Module', 'Loaded My::Module');
ok( my $obj = My::Module->new(), 'Can create instance of My::Module');

ok( $obj->value('hello'), 'Set value to hello' );
is( $obj->value => 'hello', 'value is still hello');

---

이 예제 에서 볼 수있는 Test :: Class 사용법 .

참고 URL : https://stackoverflow.com/questions/502644/how-can-i-do-unit-testing-in-perl