Teste :: Class. TEST :: Classe é um módulo Perl que permite criar facilmente as classes de teste em um estilo XUnit / Junit.
Baixe Agora

Teste :: Class. Classificação e resumo

Teste :: Class. Tag

teste Aulas criar aulas estilo xUnit Estilo junit.

Teste :: Class. Descrição

Test :: Classe é um módulo Perl que permite criar facilmente as classes de teste em um estilo XUnit / Junit. Teste :: Classe é um módulo Perl que permite criar facilmente as classes de teste em um exemplo do pacote XUnit / Junit.Synopsis :: teste; Use Base QW (teste :: Class); Use teste :: mais; # Os métodos de configuração são executados antes de cada método de teste. Sub Make_Fixture: Teste (Setup) {My $ Array = ; Shift -> {test_array} = $ matriz; }; # Um método de teste que executa 1 teste de teste subest_push: teste {my $ array = shift -> {test_array}; Push @ $ matriz, 3; is_deeply ($ matriz, , 'push funcionou'); }; # Um método de teste que executa 4 testes sub test_pop: teste (4) {my $ array = shift -> {test_array}; é (pop @ monarra, 2, 'pop = 2'); é (Pop @ $ matriz, 1, 'pop = 1'); is_deeply ($ matriz, [], 'array vazio'); é (POP @ MARAY, UNDEF, 'POP = UNDEF'); }; # Os métodos de desmontagem são executados após cada método de teste. Sub desejo: teste (desenhista) {my $ array = shift -> {test_array}; Diag ("Array = (@ $ matriz) após teste (s)"); }; mais tarde em um arquivo .t #! / usr / bin / perl use exemplo :: teste; # Execute todos os métodos de teste no exemplo :: Teste de teste :: Class-> Rattests; Saídas: 1..5 OK 1 - POP = 2 OK 2 - POP = 1 OK 3 - Array Vazio OK 4 - Pop = Redef # Array = () após o teste (s) OK 5 - Push Workated # Array = (12 3) após os requisitos do teste (s): · Perl.

Teste :: Class. Software Relacionado