Test :: classe TEST :: La classe est un module Perl qui vous permet de créer facilement des cours de test dans un style Xunit / Junit.
Télécharger maintenant

Test :: classe Classement & Résumé

Test :: classe Mots clés

essai Des classes créer des cours le style xUnit Style junit

Test :: classe La description

Test :: La classe est un module Perl qui vous permet de créer facilement des cours de test dans un style Xunit / Junit. Test :: La classe est un module Perl qui vous permet de créer facilement des cours de test dans un exemple de package Xunit / Junit Style.Synopsis :: Test; Utilisez la base qw (test :: classe); Utilisez Test :: Plus; # Les méthodes de configuration sont exécutées avant chaque méthode de test. sous-make_fixture: test (configuration) {My $ matry = ; Shift -> {Test_array} = $ TRAY; }; # une méthode de test qui exécute 1 test sous test_push: test {My $ matray = shift -> {test_array}; PUSH @ $ TRAY, 3; is_deepos }; # une méthode de test qui exécute 4 tests SUB TEST_POP: TEST (4) {My $ Array = Shift -> {Test_array}; est (POP @ $ Array, 2, 'pop = 2'); est (POP @ $ Array, 1, 'pop = 1'); is_deeply ($ tableau, [], 'Array vide'); est (POP @ $ TRAY, UNDEF, "POP = UNDEF"); }; # Les méthodes de démolition sont exécutées après chaque méthode de test. Sous-déchirance: test (dérappé) {My $ Array = Shift -> {test_array}; diag ("array = (@ $ tableau) après test (s)"); }; plus tard dans un fichier de fichier .t à proximité! / usr / bin / perl utiliser exemple :: test; # Exécuter toutes les méthodes de test dans l'exemple :: Test Test :: Classe-> Runtests; sorties: 1..5 OK 1 - POP = 2 OK 2 - POP = 1 OK 3 - TRAY vide OK 4 - POP = UNDEF # TRABY = () Après le test (s) OK 5 - PUSH TRAVAIS # Array = (12 3) Après testicule (s) Exigences: · Perl

Test :: classe Logiciels associés