Test :: Mockclass. test :: mockclass ist ein perl-Modul, um Mock-Klassen und Mock-Objekte zum Testen bereitzustellen.
Jetzt downloaden

Test :: Mockclass. Ranking & Zusammenfassung

Test :: Mockclass. Stichworte

Perl-Modul Klassen verspotten Mock-Objekte Scheinklassen

Test :: Mockclass. Beschreibung

Test :: mockclass ist ein Perl-Modul, um Mock-Klassen und Mock-Objekte zum Testen bereitzustellen. Test :: makelclass ist ein Perl-Modul, um Mock-Klassen und Mock-Objekte für testing.synopsis # -Pass in den Klassennamen und -version bereitzustellen # Erstellen Sie ein Mockclass-Objekt, um eine bestimmte Klasse mit einer bestimmten Klasse zu verarbeiten # Geben Sie an, um von einer echten Klasse zu erben, oder eine verspottete Klasse: $ Mockclass-> Inherit- ('IO :: Sockel'); # Erstellen Sie einen Konstruktor für die Klasse, kann auch 'Addmethod' für mehr Steuerung $ MockClass-> DefaultConstruktor (% ClassicDefaults) verwenden. # Fügen Sie eine Methode hinzu: $ mockclass-> addmethod ("Methodname", $ collederef); # Fügen Sie eine einfachere Methode hinzu und geben Sie Rendite-Werte an, die automatisch $ makelclass-> setreturnvalues ("Methodname2", 'immer', 3) zurückgeben wird; # Erstellen Sie eine Instanz der verspotteten Klasse: My $ MockObject = $ Mockclass-> Erstellen (% Instancedata); # Stellen Sie den gewünschten Anrufauftrag für die Methoden ein: $ mockclass-> setcallorder ('methodname2', 'MethodName', 'MethodName'); # Führen Sie Tests mit der Mock-Klasse an anderer Stelle aus: #: In der Klasse zum Testen: Sub ObjectFactory {Return Cliststomock-> Neu; } #: In Ihrem Testcode: Assert ($ testobj-> objectfactory-> isa ("classtomock")); # Holen Sie sich die Objekt-ID für den Rest der Methoden: Meine $ objectid = "$ mockoject"; #oder $ objectid = $ mockclass-> getnextobjektid (); # Stellen Sie sicher, dass die Methoden in der richtigen Reihenfolge aufgerufen wurden: if ($ Mockclass-> VerifyCallorder ($ ObjectID)) {# Tun etwas} # Hol die Reihenfolge, dass die Methoden aufgerufen wurden: My @calls = $ mockclass-> getcallorder ($ Objekt Identifikation); # Holen Sie sich die Liste der übergebenen Argumente pro Anruf: My @arglist = $ mockclass-> getargumentlist ($ objectid, 'MethodName', $ CallPosition); # Holen Sie sich die Liste der Zugriffe auf ein bestimmtes Attribut (HashKey in $ MockObject) my @Accesses = $ mockclass-> getattributeaccess ($ objectid, 'Attribut'); Anforderungen: · Perl.

Test :: Mockclass. Zugehörige Software