Test :: Klasse. Test :: Klasse ist ein Perl-Modul, mit dem Sie problemlos Testklassen in einem XUnit / Junit-Stil erstellen können.
Jetzt downloaden

Test :: Klasse. Ranking & Zusammenfassung

Test :: Klasse. Stichworte

testen Klassen Klassen erstellen xunit stil Junit-Stil

Test :: Klasse. Beschreibung

Test :: Klasse ist ein Perl-Modul, mit dem Sie Testklassen problemlos in einem XUnit / Junit-Stil erstellen können. Test :: Klasse ist ein Perl-Modul, mit dem Sie problemlos Testklassen in einem XUnit / Junit-Stil erstellen können.Synopsis-Paket Beispiel :: Test; Verwenden Sie Basis QW (Test :: Klasse); Verwenden Sie den Test :: mehr; # Setup-Methoden werden vor jeder Testmethode ausgeführt. Sub Make_Fixture: Test (Setup) {My $ Array = ; SHIFT -> {test_array} = $ Array; }; # Eine Testmethode, die 1 Test sub test_push ausgeführt hat: testen {mein $ array = shift -> {test_array}; Push @ $ Array, 3; is_Deeply ($ array, , 'gearbeitet funktioniert'); }; # Eine Testmethode, die 4 Tests sub test_pop läuft: Test (4) {My $ Array = Shift -> {test_array}; ist (POP @ $ -Ary, 2, 'pop = 2'); ist (POP @ $ Array, 1, 'POP = 1'); is_deply ($ array, [], 'array leer'); ist (POP @ $ Array, undef, 'pop = undef'); }; # Teardown-Methoden werden nach jeder Testmethode ausgeführt. SUBRYNOWN: TEST (Teardown) {MY $ array = Shift -> {test_array}; diag ("array = (@ $ array) nach test (en)"); }; später in einer nahe gelegenen .t-Datei #! / usr / bin / perl Verwenden Sie Beispiel :: Test; # Führen Sie alle Testmethoden in Beispiel aus :: Testtest :: Klasse-> RunTests; Ausgänge: 1..5 OK 1 - POP = 2 OK 2 - POP = 1 OK 3 - Array leer OK 4 - POP = undef # Array = () Nach dem Test (n) ok 5 - Push gearbeitet # Array = (12 3) Nach Test (s) Anforderungen: · Perl.

Test :: Klasse. Zugehörige Software