Lines Matching refs:im
9 my $im=Image::Magick->new();
10 $im->Read('logo:');
15 my $skin=$im->Get('pixel[400,200]');
18 $im->Set('pixel[1,1]'=>'0,0,0,0');
19 $im->Set('pixel[2,1]'=>$skin);
20 $im->Set('pixel[3,1]'=>'green');
21 $im->Set('pixel[4,1]'=>'rgb(255,0,255)');
26 my @pixel = $im->GetPixel( x=>400, y=>200 );
36 $im->SetPixel(x=>5,y=>1,color=>\@pixel);
41 $im->Crop(geometry=>'7x3+0+0');
42 $im->Set(page=>'0x0+0+0');
43 $im->Scale('1000%');
46 $im->Write('win:');
47 $im->Write('single-pixels.gif');
