[magick-users] perl pixel manipulator

[Ron Savage]

Henjo wrote:

Hi Henjo

> 	# load image
>         $f = 'input.png';
>         $original = Image::Magick->new;
>         $original->Read($f);

Why don't you just get the RGBA values like this:

my($x) = 0;
my($y) = 0;
my(@pixel) = split(/,/, $original -> Get("Pixel[$x,$y]") );

-- 
Ron Savage
ron at savage.net.au
http://savage.net.au/index.html