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;