Select Code to Download

use Image::Magick;

...
my $file = $image->Read('old.gif'); 
$image->Opaque(color => '#000000', fill => '#0000ff'); 
$image->Write('new.gif');