I moved the binmode and it made no difference.

            my $fh = IO::File->new_tmpfile or print "Unable to make ne
+w temp file: $!";
            binmode($fh);
            
            $member->extractToFileHandle($fh);
[download]

            my $fh = IO::File->new_tmpfile or print "Unable to make ne
+w temp file: $!";
            
            $member->extractToFileHandle($fh);
            binmode($fh);
[download]

Output: From CALC: 2b35e7ab From ZIP: 9bdd56f6 test.log Thanks for the suggestion.