SYNOPSIS
use Imager;
my $img = Imager->new;
$img->read(file=>"foo.ico")
or die $img->errstr;
my @imgs = Imager->read_multi(file => "foo.ico")
or die Imager->errstr;
$img->write(file => "foo.ico")
or die $img->errstr;
Imager->write_multi({ file => "foo.ico" }, @imgs)
or die Imager->errstr;