Select Code to Download

 package Win32::TieRegistry64Support;# change name
......
sub KEY_WOW64_64KEY () { 0x0100}
...
@$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;