[perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings

The attachment is a accidentally posted work in progress debugging
scripts for the patch, it uses a release of Win32::API. I'll have better
test scripts tomorrow.

---
via perlbug:  queue: perl5 status: open
https://rt.perl.org:443/rt3/Ticket/Display.html?id=113536

• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Karthik Rajagopalan via RT
• Re: [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Kartlee Schrodinger
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Karthik Rajagopalan via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Karthik Rajagopalan via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Karthik Rajagopalan via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Steve Hay via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Karthik Rajagopalan via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Steve Hay via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Karthik Rajagopalan via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Steve Hay via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• RE: [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Steve Hay
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by bulk88 via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Steve Hay via RT
• [perl #113536] GetEnvironmentStrings() mess up the values for non-ascii strings by Karthik Rajagopalan via RT