[magick-users] Bitonal bitmap out

[Illtud Daniel]

Illtud Daniel wrote:

> @pixels = 
> $ffoto->GetPixels(map=>'I',height=>$height,width=>$width,normalize=>true);
> print (pack('B*',join('', at pixels)));

I got different behaviours with this between my dev & production
servers. Just as a gotcha to anybody else, you need to set:

binmode STDOUT;

to stop perl helpfully character-encoding your output. That
had me stumped for a while.

-- 
Illtud Daniel                                 illtud.daniel at llgc.org.uk
Uwch Ddadansoddwr Systemau                       Senior Systems Analyst
Llyfrgell Genedlaethol Cymru                  National Library of Wales
Yn siarad drosof fy hun, nid LlGC   -  Speaking personally, not for NLW