diff --git a/tests/getpart.pm b/tests/getpart.pm index 2b6d2a63c4..75eb8dfe5d 100644 --- a/tests/getpart.pm +++ b/tests/getpart.pm @@ -229,7 +229,7 @@ sub loadtest { if(open(my $xmlh, "<", "$file")) { if($original) { - binmode $xmlh, ':crlf' + binmode $xmlh, ':crlf'; } else { binmode $xmlh; # for crapage systems, use binary