If you do a Google for 'GetPixel VB' you will find plenty of VB to do it. Then all you have to do is convert it to Perl :-)

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print