graphics/imagemagick
graphics/imagemagick
1
0
Fork 0
mirror of https://github.com/imagemagick/imagemagick synced 2024-10-18 17:02:34 +00:00
Code Issues Packages Projects Releases Wiki Activity

display hidden image

Browse source
This commit is contained in:
Cristy 2023-12-26 14:14:56 -05:00
parent c02326baa4
commit 1dfcae1472
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
PerlMagick/demo/steganography.pl
View file

@ -15,7 +15,7 @@ $image=Image::Magick->new;
$image->ReadImage('model.gif');
$image->SteganoImage(image=>$watermark,offset=>91);
$image->Write('model.pam');
$image->Write('show:');
$image->Write(magick=>'SHOW',title=>"Steganography Model");
#
# Extract image from image.
#
@ -23,4 +23,4 @@ $size="$width" . "x" . "$height" . "+91";
$stegano=Image::Magick->new(size=>$size);
$stegano->ReadImage('stegano:model.pam');
$stegano->Write('stegano.pam');
$image->Write(magick=>'SHOW',title=>"Steganography Demo");
$stegano->Write(magick=>'SHOW',title=>"Hidden Image");