my %regHash;
use Win32::TieRegistry ( TiedHash => \%regHash );
$regHash{"HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ProxyEnable"}
=[ "0x0000" , "REG_DWORD" ];