Patch from RT 79165. Fix for Strawberry Perl