my $image = Image::Magick->new();
$image->Set(size=> "800x600");
$image->ReadImage('xc:white');