eval { @regValues = $fieldKey->ValueNames; };
print "\$\^E: $^E\nregLastError: " . Win32API::Registry::regLastError() ."\n\n";