package Win32::TieRegistry64Support;# change name
......
sub KEY_WOW64_64KEY () { 0x0100}
sub KEY_WOW64_32KEY () { 0x0200}
........
@$RegObj{qw( HANDLE MACHINE PATH DELIM OS_DELIM ACCESS FLAGS ROOTS )}= (
"NONE", "", [], "\\", "\\",
KEY_READ|KEY_WRITE|KEY_WOW64_64KEY|KEY_WOW64_32KEY, $Flag_HexDWord|$Flag_FixNulls, "${PACK}::_Roots" );
####
use Win32::TieRegistry;
##
##
use Win32::TieRegistry64;