Select Code to Download

...read $fh in binmode etc.
binmode STDOUT, ':raw';
...
close ( $fh );
binmode STDOUT, ':utf8';   <-- :utf8 the equivalent of -CO right?
return;