Using perl Syntax Highlighting
use Image::Magick;
$p = Image::Magick->new;
$p->Read('i.jpg');
$p->Read('p.jpg');
$p->Read('x.jpg');
$p->set(compress=>'zip');
$p->Write('archivo.tiff');
$p = Image::Magick->new;
$p->Read('i.jpg');
$p->Read('p.jpg');
$p->Read('x.jpg');
$p->set(compress=>'zip');
$p->Write('archivo.tiff');
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4
Aparentemente me lo ejecuta bien, pero a la hora de visualizar las imágenes en el archivo.tiff aparecen las tres páginas (las 3 jpg [i,p,x]) pero todas negras, es decir, hora de ver el archivo.tiff éstas se ven obscuras.
Espero me puedan ayudar.