diff --git a/dawg/dict2dawg.pl b/dawg/dict2dawg.pl
index bc4a3a10f..5ba151d34 100755
--- a/dawg/dict2dawg.pl
+++ b/dawg/dict2dawg.pl
@@ -624,6 +624,7 @@ sub emitNodes($$) {
 
         my $outName = sprintf("${outFileBase}_%03d.bin", $nextFileNum);
         open OUTFILE, "> $outName";
+        binmode( OUTFILE );
         my $curSize = 0;
 
         while ( $nextIndex < @gNodes ) {
diff --git a/dawg/xloc.pl b/dawg/xloc.pl
index d811b51a1..e13b41eff 100755
--- a/dawg/xloc.pl
+++ b/dawg/xloc.pl
@@ -21,7 +21,8 @@
 use strict;
 use xloc;
 
-
+# For f*cking windoze linefeeds
+binmode(STDOUT);
 
 my $arg = shift(@ARGV);
 my $lang = shift(@ARGV);