If you're allowed to convert it to png, jpg or xpm, you can use GD. And access the color at $x, $y with

my @rgb = $img->rgb( $img->getPixel($x, $y) );

if ( 3 == grep !$_, @rgb ) {
    print "*";
} else {
    print " ";
}
[download]

[ ar0n ]