Prueba :: con clase Escriba sus pruebas de unidad en otros módulos que * .t
Descargar ahora

Prueba :: con clase Clasificación y resumen

Prueba :: con clase Etiquetas

Módulo perl perla pruebas unidad Pruebas de unidad

Prueba :: con clase Descripción

Escriba sus pruebas de unidad en otros módulos que * .t Prueba :: Clasy es un módulo PERL para escribir sus pruebas de unidad en otros módulos que * .t.synopsisin su archivo de prueba (T / ALGAN_TEST.T): use lib 't / lib'; Usa la prueba :: con clase; Usa MyApp :: Modelo :: DB; # preparar cosas que desea usar en las pruebas (si lo prefiere) My $ db = MyApp :: Modelo :: DB-> Conectar; # cargar todos los paquetes de prueba encontrados en MyApp :: Test :: Load_tests_from 'MyApp :: Test'; # o cargarlo explícitamente load_test 'MyApp :: OtherTest :: ForSomething'; # Puede limitar las pruebas solo con el modelo de atributo limit_tests_by 'modelo'; # Ejecutar cada una de las pruebas ($ dB se pasará como un argumento) # Por lo general, no necesita declarar el plan de las pruebas aquí. run_tests ($ db); # Vamos a hacer algunas limpiaciones end {$ db-> desconectar; } En su unidad de prueba de unidad: paquete MyApp :: Prueba :: algo; Prueba de uso :: Classy :: Base; # Escribir 'prueba' atributo para probar sub for_some: prueba {my ($ clase, @args) = @_; # Algunas pruebas de unidad OK 1, "Puede usar la prueba :: Más funciones de predeterminada"; } # Puede declarar el número de pruebas en una unidad SUB FOR_TERS: Pruebas (2) {My ($ Class, @Args) = @_; Pase 'primero'; Pase 'Segundo'; } # Las pruebas se omitirán con el atributo 'SKIP' SUBTET_ANTER: Pruebas (2) Omitir (por alguna razón) {My ($ Class, @args) = @_; Pase 'Pero esta prueba será omitida'; Fallo 'pero esta prueba se omitirá, ya sea'; } # TODO debería funcionar como esperas, también. Sub May_Fail: Pruebas TODO (por alguna razón) {My ($ Class, @Args) = @_; fallar hasta que se implemente algo "; } # Puede agregar cualquier atributo para limitar sub test_for_model: modelo de prueba {my ($ class, @args) = @_; # Puede usar $ class-> test_name para mostrar el nombre de la prueba Pass $ Class-> Test_name; # "test_for_model"} Requisitos: · Perl

Prueba :: con clase Software relacionado