Prueba :: imagen prueba una imagen
Descargar ahora

Prueba :: imagen Clasificación y resumen

Prueba :: imagen Etiquetas

imagen Módulo perl perla ensayador Imágenes de prueba

Prueba :: imagen Descripción

Prueba una imagen Prueba :: La imagen es una prueba :: Módulo de prueba compatible con el constructor para las imágenes de prueba. Calling Los métodos de este módulo imprimen a prueba cualquier salida de protocolo diseñada para ser procesada por prueba :: ARRIBE DURANTE. Este módulo 'juega agradable' con otros módulos de prueba también diseñados con prueba :: constructor. Por ejemplo, puede usar felizmente este módulo junto con la prueba :: Más, prueba :: Excepción, Prueba :: DatabaseRow, etc, y no tiene que preocuparse por los números de prueba que se confundan. Todos los métodos deben tomar una descripción opcional como la última. argumento. Por ejemplo: $ i-> ancho (400); # Imprime "OK 1 - Ancho de imagen" $ i-> ancho (400, "1er ancho"); # imprime "OK 2 - 1º Ancho" Sinopsis Use la prueba :: Más Plan => 1; Usar prueba :: imagen; # Crear un nuevo probador de imágenes My $ i = prueba :: Image-> Nuevo (Imagen :: imlib2-> Nuevo ("foo.jpg")); OK ($ i "," IMAGEN OK "); $ i-> tamaño (400,300); # (ver también $ i-> ancho, $ i-> altura) # Puede revisar píxeles usando nombres, rgb hex, o rgb decimal $ i-> píxel (10,10, "blanco"); # 10, 10 es blanco $ i-> Pixel (10,10, "FFFFFF"); # 10, 10 es blanco $ I-> Pixel (10,10, ); # 10, 10 es blanco $ i-> pixel_not (10,10, "blanco"); # 10, 10 no es blanco $ i-> Pixel_Not (10,10, "FFFFFF"); # 10, 10 no es blanco $ i-> pixel_not (10,10, ); # 10, 10 no es blanco # Puede usar múltiples posibilidades # verificar el píxel es rojo, blanco o azul: $ i-> píxel (10,10, ); $ i-> Pixel (10,10, ); $ i-> Pixel (10,10, , , ]; # Compruebe que el píxel no sea rojo blanco o azul: $ i-> pixel_not (10,10, ); $ i-> pixel_not (10,10, ); $ i-> pixel_not (10,10, , , ]; # Funciones de fila (o reemplazar "FILA" con "col" o "columna" para las pruebas de columna) # Puede usar múltiples colores $ i-> fila (10, "blanco"); # fila 11 es todo blanco $ i-> row_all (10, "blanco"); # fila 11 es todo blanco $ i-> Row_any (10, "White"); # fila 11 tiene un píxel blanco $ i-> Row_None (10, "White"); # fila 11 no tiene píxeles blancos # igualmente para toda la imagen (nuevamente puede usar varios colores) $ i-> todos ("blanco"); # Toda la imagen es blanca $ i-> cualquiera ("blanco"); # Toda la imagen tiene un píxel blanco $ i-> ninguno ("blanco"); # Toda la imagen no tiene píxeles blancos # Finalmente regiones (puede usar _all, _aneny o _none también) # verifique la región 10x10 a partir de 40,30 $ I-> Región (40, 30, "R10", "R10", " blanco"); Requisitos: · Perl

Prueba :: imagen Software relacionado