One Hat Cyber Team
Your IP :
162.159.115.34
Server IP :
188.114.96.3
Server :
Linux thuru 6.5.11-4-pve #1 SMP PREEMPT_DYNAMIC PMX 6.5.11-4 (2023-11-20T10:19Z) x86_64
Server Software :
Apache/2.4.51 (Unix) OpenSSL/1.0.2k-fips
PHP Version :
7.3.33
Buat File
|
Buat Folder
Eksekusi
Dir :
~
/
usr
/
share
/
doc
/
ImageMagick-perl-6.9.10.68
/
demo
/
Edit File:
steganography.pl
#!/usr/bin/perl eval 'exec /usr/bin/perl -S $0 ${1+"$@"}' if 0; # not running under some shell use Image::Magick; # # Hide an image within an image # $watermark=Image::Magick->new; $watermark->ReadImage('smile.gif'); ($width, $height)=$watermark->Get('width','height'); # # Hide image in image. # $image=Image::Magick->new; $image->ReadImage('model.gif'); $image->SteganoImage(image=>$watermark,offset=>91); $image->Write('model.png'); $image->Write('win:'); # # Extract image from image. # $size="$width" . "x" . "$height" . "+91"; $stegano=Image::Magick->new(size=>$size); $stegano->ReadImage('stegano:model.png'); $stegano->Write('stegano.gif'); $stegano->Write('win:');
Simpan