Bug #77440 for Win32API-Registry: Seems to be broken for Strawberry perl (5.16)

Fri May 25 23:10:31 2012 frioux [...] gmail.com - Ticket created

Subject:

Seems to be broken for Strawberry perl (5.16)

I don't actually fully know what's going on, and I'd love to chat with one of you on IRC and see if we can nail this down, but this won't build at all for me. Here's output: C:\strawberry\perl\bin\perl.exe "-Iblib\lib" "-Iblib\arch" test.pl 1..216 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 Can't find key with values: More data is available dmake.exe: Error code 255, while making 'test_dynamic' FAIL

Tue Mar 05 05:12:43 2013 MICHIELB [...] cpan.org - Correspondence added

It's not limited to Strawberry, I get the exact same error messages with a Visual C 2008 compiled Perl.

Tue Mar 05 05:12:44 2013 The RT System itself - Status changed from 'new' to 'open'

Thu Jun 27 15:43:18 2013 JDB [...] cpan.org - Correspondence added

On Fri May 25 23:10:31 2012, frew wrote: Show quoted text

> I don't actually fully know what's going on, and I'd love to chat with > one of you on IRC and see if we can nail this down, but this won't build > at all for me. Here's output:

This just happens because on newer versions of Windows the keys under HKLM/SYSTEM/WAP are longer than they used to be. Just increase the buffer size for the tests and everything passes: --- a/test.pl +++ b/test.pl @@ -20,7 +20,7 @@ BEGIN { eval "use Win32API::Registry qw(:SE_);" } $|= 1 if $Debug= ( -t STDIN ) != ( -t STDOUT ); -$zero= 16; # Change to 0 when RegEnumKeyExA() and RegEnumValueA() +$zero= 32; # Change to 0 when RegEnumKeyExA() and RegEnumValueA() # handle ERROR_MORE_DATA better! $ok= RegQueryInfoKey( HKEY_LOCAL_MACHINE, $class, $clen=0, [],

Mon Feb 16 10:10:19 2015 CHORNY [...] cpan.org - Status changed from 'open' to 'patched'

Tue Apr 07 14:44:27 2015 CHORNY [...] cpan.org - Status changed from 'patched' to 'resolved'

Tue Apr 07 14:44:33 2015 CHORNY [...] cpan.org - Fixed in 0.33 added