use Win32::TieRegistry ( Delimiter=>"/", ArrayValues=>1 );
my $rkey=$Registry->{"CUser/Software/Microsoft/Windows/CurrentVersion/Internet Settings"};
$rkey->SetValue( "ProxyServer"   , "localhost:8080"	, "REG_SZ"    );
$rkey->SetValue( "ProxyEnable"   ,pack("L",1)		, "REG_DWORD" );
$rkey->SetValue( "ProxyOverride" , "127.0.0.1;<local>" 		, "REG_SZ"    );