Test :: Assertions.

test :: Assertions-Modul ist ein einfacher Satz von Bausteinen für Einheit und Laufzeitprüfungen.
Jetzt downloaden

Test :: Assertions. Ranking & Zusammenfassung

Anzeige

  • Rating:
  • Lizenz:
  • Perl Artistic License
  • Preis:
  • FREE
  • Name des Herausgebers:
  • John Alden
  • Website des Verlags:
  • http://search.cpan.org/~bbc/Test-Assertions-1.054/lib/Test/Assertions.pm

Test :: Assertions. Stichworte


Test :: Assertions. Beschreibung

Test :: Assertions-Modul ist ein einfacher Satz von Bausteinen für Einheit und Laufzeitprüfungen. Test :: Assertions-Modul ist ein einfacher Satz von Bausteinen für Einheit und Laufzeittests.Synopsis #assert verwendet nichts Test: Assertions; #Tert warnt "Assertion Failure" ... Verwenden Sie Test :: Assertions QW (Warn); #Tert stirbt mit "Assertionsfehler" ... Testen Sie den Test :: Assertionen QW (Die); #Tert warnt "Behauptungsfehler" ... mit Stack-Trace-Test-Test :: Assertionen QW (Cluck); #Tert stirbt mit "Assertionsfehler" ... mit Stack-Trace-Test-Test :: Assertionen QW (Bekenntnis); #Assert Drucke OK / NICHT OK Verwenden Sie Test :: Assertionen QW (Test); #Will verursachen einen Assertion-Fehler Assert (1 == 0); #Optional-Nachricht Assert (0 == 1, "dumm"); #Checks, wenn Coderef stirbt (gestorben (sub {stirbt ()})); #Check, wenn Perl kompiliert OK ASSERT (kompiliert ('programm.pl')); #Deep-Vergleiche behaupten (gleich (@a, @b), "Listen von Widgets Match" # eine optionale Nachricht); Behaupten (gleich (% a,% b)); #Compare an einen Konserven-Wert Assert (Equals_File ($ Foo, 'bar.dat'), "Wertabgestegter gespeicherter Wert"); #Compare zu einem Konserven-Wert (Regex-Übereinstimmung mithilfe von Dateiinhalten als Regex) Assert (Matches_File ($ Foo, 'bar.regex')); #Compare-Dateiinhalte Assert (files_equal ('foo.dat', 'bar.dat')); #Returns 'nicht ok für foo :: bar tests (1 Fehler in 3 Tests)' Bewertung (, 'foo :: bar tests ', 0); #Collate-Ergebnisse aus einem anderen Test Script Ascript_File ("test.pl"); #File-Routinen $ success = write_file ('bar.dat', 'hallo welt'); Assert (WRITE_FILE ('bar.dat', 'hello World'), 'Datei wurde geschrieben'); $ string = read_file ('beispiel.out'); Assert (Read_File ('Beispiel.out'), 'Datei hat Inhalt'); Die Helfer-Routinen müssen nicht in Assert () verwendet werden (): if (Equals_File ($ String, $ Dateiname)) {drucken "Datei hat t geändert - überspringen "; } else {My $ rc = run_complex_process ($ saite); drucken "Datei geändert - String wurde mit dem Ergebnis" $ rc'n "wiederaufbereitet; } ($ boolean, $ output) = kompiliert ('file.pl'); # oder ... meine $ string; ($ boolean, $ standard_output) = kompiliert ('file.pl', 1, $ nace); # $ string enthält jetzt Standardfehler, separat von $ standard_outputin Testmodus: Testen Sie den Test :: Assertionen QW (Test); Plantests => 4; Testtests; #will versuchen, die Nummer nur abzuleiten (1,2); #Only melden ok / nicht ok für diese tests ignorieren 2; #SKIP Dieser Test #in Test / OK-Modus ... Verwenden Sie Test :: Assertions QW (Test / OK); ok (1); #Synonym, um die Anforderungen zu geltend zu halten: · Perl.


Test :: Assertions. Zugehörige Software