That looks very broken. Can you investigate Win32::WinError? What changed about it? For example:
perl -MWin32::WinError -le"print for $INC{'Win32/WinError.pm'}, $Win32 +::WinError::VERSION"
In the mean time, you can edit TieRegistry.pm to make it no longer rely on Win32::WinError:
#if( eval { require Win32::WinError } ) { # $_NoMoreItems= Win32::WinError::constant("ERROR_NO_MORE_ITEMS",0) +; # $_FileNotFound= Win32::WinError::constant("ERROR_FILE_NOT_FOUND", +0); # $_TooSmall= Win32::WinError::constant("ERROR_INSUFFICIENT_BUFFER" +,0); # $_MoreData= Win32::WinError::constant("ERROR_MORE_DATA",0); #} else { $_NoMoreItems= "^No more data"; $_FileNotFound= "cannot find the file"; $_TooSmall= " data area passed to "; $_MoreData= "^more data is avail"; #}
Comment out those lines as shown above.
- tye
In reply to Re^5: Win32::TieRegistry Error (or is it me?) (leads)
by tye
in thread Win32::TieRegistry Error (or is it me?)
by ChrisR
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |