$image->Read($filename);
$image->Write(scene=>15,
              filename=>"testp%04d.tif",
              compression=>'Group4',
              density=>"240x240");