| Subject: | missing binmode |
I think during the latest refactoring a "binmode" was dropped, making
mirroring fail on Windows. Usually, this shows up as "Content-length
mismatch."
The following seems to work for me.
--- Protocol.pm.orig Wed Sep 24 19:50:42 2008
+++ Protocol.pm Mon Sep 29 11:43:30 2008
@@ -102,6 +102,7 @@
}
elsif (!ref($arg) && length($arg)) {
open(my $fh, ">", $arg) || die "Can't write to '$arg': $!";
+ binmode($fh);
push(@{$response->{handlers}{response_data}}, sub {
print $fh $_[3] || die "Can't write to '$arg': $!";
1;