Imager :: ImageTypes Imager :: ImageTypes es un módulo PERL que contiene modelos de imagen para la imagen.
Descargar ahora

Imager :: ImageTypes Clasificación y resumen

Imager :: ImageTypes Etiquetas

imagen Módulo perl Imager modelos modelos de imagen Modelos de cámara

Imager :: ImageTypes Descripción

Imager :: ImageTypes es un módulo Perl que contiene modelos de imagen para la imagen. Imager :: ImageTypes es un módulo Perl que contiene modelos de imagen para Imager.Synopsis. Use Imager; $ img = imager-> nuevo (); # Imagen vacía (el tamaño es 0 por 0) $ img-> Abrir (archivo => 'lena.png', escriba => 'PNG'); # Lea la imagen de archivo $ img = Imager-> Nuevo (XSIZE => 400, YSize => 300); # RGB DATA $ img = Imger-> Nuevo (XSIZE => 400, YSize => 300, # canales de escala de grises => 1); # $ img = Imager-> Nuevo (XSIZE => 400, YSize => 300, # RGB con canales alfa => 4); # $ img = Imager-> Nuevo (XSIZE => 200, YSize => 200, Tipo => 'paletted'); # imagen paletted $ img = Imager-> Nuevo (XSIZE => 200, YSize => 200, Bits => 16); # 16 bits / canal rgb $ img = Imager-> Nuevo (XSIZE => 200, YSize => 200, Bits => 'Double'); # 'doble' punto flotante # por canal $ img-> img_set (xsize => 500, ysize => 500, # Restablecer los canales de objetos de imagen => 4); # Ejemplo Obteniendo información sobre un objeto de imagen Imprimir "Información de imagen: n"; Imprimir "Ancho:", $ img-> getwidth (), "n"; Imprimir "Altura:", $ img-> GetHeight (), "N"; Imprimir "Canales:", $ img-> getchannels (), "n"; Imprimir "Bits / canal:", $ img-> bits (), "n"; Imprimir "virtual:", $ img-> virtual ()? "Sí": "No", "n"; My $ COLORCOUNT = $ img-> getcolorconde (maxcolors => 512); Imprimir "Número real de colores en la imagen:"; Imprimir definido ($ ColorCount)? $ ColorCount: "> 512", "N"; Imprimir "Tipo:", $ img-> tipo (), "n"; if ($ img-> tipo () eq 'directo') {impresión "canales modificables:"; Únete a la impresión "", mapa {($ img-> getmask () y 1colorcount; @colors = $ img-> getcolors (); Imprimir "Tamaño de la paleta: $ condes"; My $ MX = @colors> 4? 4: 0 + @ colores; imprimir "Primeras entradas de $ MX: n"; para (@colors ) {mx @res = $ _-> rgba (); imprimir "(", onozle (", ", @res ),") n ";}} Mis @tags = $ img-> Etiquetas (); if (@tags) {impresión" Etiquetas: n "; para (@tags) {impresión Shift @ $ _,": ", Únete" ", @ $ _," N ";}} else {imprimir" sin etiquetas en imagen ";} Requisitos: · Requisitos de Perl: · Perl

Imager :: ImageTypes Software relacionado