open my $OUT, '>', $filename or die $!;
binmode $OUT, ':utf8';