--- bin/ldap-rewrite.pl	2009/03/16 10:12:57	22
+++ bin/ldap-rewrite.pl	2009/03/16 13:27:44	23
@@ -131,6 +131,10 @@
 	die "Could not create listener socket: $!\n" unless $listenersock;
 	die "Could not create connection to server: $!\n" unless $targetsock;
 
+	# mark sockets as binary
+	binmode( $listenersock );
+	binmode( $targetsock );
+
 	my $sel = IO::Select->new($listenersock);
 	my %Handlers;
 	while (my @ready = $sel->can_read) {