Help for this page

Select Code to Download

Select or download this

$remote_key = $Registry->Open(
  "$machine/$root_key", { Access => "KEY_READ" } )
  or die "Can't read $root_key: ", regLastError(), "\n";

Select or download this

use Win32::TieRegistry qw( :KEY_ );
# ...
$remote_key = $Registry->Open(
  "$machine/$root_key", { Access => KEY_READ()|KEY_SET_VALUE() } )
  or die "Can't read $root_key: ", regLastError(), "\n";