Test :: SimpleUnit. Test :: SimpleUnit ist ein vereinfachter Framework von Perl Unit-Testing.
Jetzt downloaden

Test :: SimpleUnit. Ranking & Zusammenfassung

Test :: SimpleUnit. Stichworte

Rahmen Perl-Modul Perl Perl-Framework. Einheitsprüfungsrahmen

Test :: SimpleUnit. Beschreibung

Test :: SimpleUnit ist ein vereinfachter Framework von Perl Unit-Testing. Test :: SimpleUnit ist ein vereinfachtes Perl-Unit-Testing Framework.Synopsis Verwenden Sie Test :: SimpleUnit qw {: Funktionen}; runtests ({name => "test1", test => sub {... {...}}, {name => "testn", test => sub {...}}); Verwendung Test :: SimpleUnit qw {: Funktionen}; # Wenn eine Setup- oder Teardown-Funktion fehlschlägt, überspringen Sie den Rest der Tests Test :: SimpleUnit :: autoskipfailedsetup (1); Test :: SimpleUnit :: autoskipfailedTeardown (1); meine $-Instanz; mein $ errepftewasokay = 0; my @tests = (# erfordern das Modul {name => 'erfordern', test => sub {# Vergewissern Sie sich, dass wir das zu testende Modul laden können. AssertNoException {erfordern myclass}; # Versuchen Sie, einige Funktionen zu importieren, um einige Funktionen zu importieren, indem Sie einige Funktionen importieren, um ein Benutzerdefiniert zu importieren. Fehlermeldung, wenn IT-# fehlschlägt {Code}; Assertref 'Code', * :: myTherefunc {Code}; # Legen Sie das Flag ein, um die Setup-Funktion zulassen, dass die Setup-Funktion das geladene Modul erkannt hat, okay $ Ereignis,}, # Setup-Funktion (dies wird vor einem ausgeführt Tests, die folgen) {name => 'setup', test => sub {# Wenn der vorherige Test nicht abgeschlossen ist, ist es nicht ordentierbar, also überspringen Sie einfach die # Ruhe des Tests Skipall "-Modul, das nicht geladen wird $ Instanz = neue myclass;},}, # Tearddown-Funktion (dies wird nach den folgenden Tests ausgeführt) {name => 'Teardown', test => sub {undef $ -Untermin;},}, # test die Verbindung ( ) und trennen () metho ds {name => connect () und trennen () ', test => sub {my $ rval; AssertnoException {$ rval = $ expand-> connect}; Assert $ RVAL, "Connect fehlgeschlagen ohne Fehler."; AssertnoException {$-Instanz-> Trennen}; },}, # Einmalige Setup-Funktion - überschreibt das vorherige Setup, ist jedoch nach der Ausführung sofort verworfen. {name => 'setup', func => sub {myclass :: PrepNetwork (); },}, # Überschreibt jetzt die vorherige Setup-Funktion mit einem neuen, der vor jedem verbleibenden Test # a Connect () ist. {name => 'setup', test => sub {$ exstanz = neue myclass; $ Instanz-> connect; },} # Dasselbe für Teardown / Trennen () {Name => 'Teardown', test => sub {$ exstanz-> trennen; undef $ -Tinformation; },}, ...); runtests (@testsuite); Anforderungen: · Perl.

Test :: SimpleUnit. Zugehörige Software