[Dresden-pm] Frage zum Testen (Regressionstests)

A. Pagaltzis pagaltzis at gmx.de
Don Feb 2 08:51:18 PST 2006


* Falk Herrmann <falk.herrmann at bike24.net> [2006-02-02 11:15]:
>Test::Harness ist evtl. genau das, was du suchst.
>
>use Test::Harness;
>runtests(@test_files);
>
>Beispiele zum Aufruf sind in der Doku zu finden.

Dafür nimmt man nicht Test::Harness selber, sondern überlässt die
Arbeit dem bei Test::Harness mitgelieferten Utility »prove«.

>Dein letztes Perl Script musst Du etwas modifizieren. Es darf
>nicht das Ergebnis der Operation angezeigt werden, sondern nur
>"ok" oder "not". Den Rest macht dann das Modul.

Das macht man auch nicht selber, sondern schreibt die Tests mit
den bei Test::More mitgelefierten Hilfsmitteln.

Gruss,
-- 
#Aristoteles
*AUTOLOAD=*_;sub _{s/(.*)::(.*)/print$2,(",$\/"," ")[defined wantarray]/e;$1};
&Just->another->Perl->hacker;