use Win32::TieRegistry(Delimiter => "/", ArrayValues => 0);

$host = "myserver.com";
$remKey= $Registry->Connect($host,"LMachine/",{ Access=>KEY_READ, Delimiter=>"/" } );
$remoteKey = $Registry->{"//$host/LMachine/SOFTWARE/Microsoft/Windows NT/CurrentVersion/ProductName"} or die "Can't read from $host. Error: $^E\n";
print "$remoteKey\n";