Test :: şık Ünite testlerini diğer modüllerde * .T'den daha yazın.
Şimdi İndirin

Test :: şık Sıralama ve Özet

Test :: şık Etiketler

Perl modülü perl testler birim Birim testleri

Test :: şık Açıklama

Ünite testlerinizi diğer modüllerde * .t'tan daha yazın. Test :: Classy, birim testlerinizi diğer modüllerde * .t.synopsisinizde yazmak için bir perl modülüdür (T / some_test.t): 't / lib' kullanın; Kullanım Testi :: şık; MyApp :: Model :: db; # Testlerde kullanmak istediğiniz şeyleri hazırlayın (tercih ederseniz) $ DB = MyApp :: Model :: DB-> Bağlan; # MyApp :: Test :: load_tests_from 'myApp :: test' altında bulunan her test paketini yükleyin; # veya yükleyin Açıkça LOAD_TEST 'MYApp :: DiğerTest :: ForSomething'; # Testleri yalnızca model özniteliği Limit_Tests_by 'model' ile sınırlayabilirsiniz; # Testlerin her birini çalıştırın ($ DB bir argüman olarak kabul edilecektir) # genellikle burada testlerin planını bildirmenize gerek yoktur. run_tests ($ db); # Hadi bazı temizlikler yapalım {$ dB-> bağlantısını kes; } Ünite test sınıfınızdaki: Package MyApp :: Test :: bir şey; KULLANIM TESTİ :: Klas :: Baz; # 'Test' niteliğini test etmek için SUB FOR_SOME: TEST {My ($ Class, @args) = @_; # Bazı birim testi tamam 1, "Test:: daha fazla fonksiyonları varsayılan olarak kullanabilirsiniz"; } # Birim altındaki testlerin sayısını beyan edebilirsiniz: testler (2) {My ($ class, @args) = @_; 'ilk' geçmek; 'İkinci' geçmek; } # Testler 'Skip' Intribute Alt_another ile atlanacak: testler (2) Atla (bazı nedenlerden dolayı) {My ($ class, @args) = @_; geçişi 'ama bu test atlanacak'; başarısız 'ama bu test her ikisi de atlanacak'; } # TODO da beklediğiniz gibi çalışmalıdır. Alt May_Fail: Testleri TODO (bazı nedenlerden dolayı) {My ($ class, @args) = @_; 'bir şeyin uygulanıncaya kadar' başarısız '; } # Sub Test_For_Model: Test Model {My ($ Class, @args) = @_; # $ Class-> Test_Name'u kullanabilirsiniz. Test PASS $ Class-> Test_Name adını göstermek için; # "TEST_FOR_MODEL"} GEREKLİLİKLERİ: · Perl

Test :: şık İlgili Yazılım