perl Win32::TieRegistry broken on Vista -- perl v5.10.0, TieRegistry v0.25

[Neil Mowbray]

Folks,

TieRegistry produces no values for keys.   In below $key is defined
but %$key is empty.  Indeed it does work for any key not just
LMachine/Software.  

This code works correctly with ActiveState perl.

---- example ----
use Win32::TieRegistry(Delimiter => '/', ArrayValues => 0);
$key = $Registry->{'LMachine/SOFTWARE/'};
printf "error: key not found" if !(defined($key));

while (my ($k,$v) = each(%$key)) {
	printf "  %s = %s\n", $k, $v;
}
---- example ----

Actually not of the registry functions appear to produce values.

Attached output from cygcheck.

Regards, Neil
-------------- next part --------------
A non-text attachment was scrubbed...
Name: cygcheck.output
Type: application/octet-stream
Size: 47779 bytes
Desc: not available
URL: <http://cygwin.com/pipermail/cygwin/attachments/20091215/c3299049/attachment.obj>
-------------- next part --------------
--
Problem reports:       http://cygwin.com/problems.html
FAQ:                   http://cygwin.com/faq/
Documentation:         http://cygwin.com/docs.html
Unsubscribe info:      http://cygwin.com/ml/#unsubscribe-simple