in reply to Working with Windows Registry in PERL

Have you tried any of the suitable modules on CPAN?
--
No matter how great and destructive your problems may seem now, remember, you've probably only seen the tip of them. [1]
  • Comment on Re: Working with Windows Registry in PERL

Replies are listed 'Best First'.
Re^2: Working with Windows Registry in PERL
by pramodkh (Novice) on Jun 11, 2008 at 12:17 UTC
    Using Win32::TieRegistry module I tried this : 
    use Win32::TieRegistry( Delimiter=>"/", ArrayValues=>0 );
  
    $RegHash= $Registry->{"HKEY_LOCAL_MACHINE/SYSTEM/CURRENTCONTROLSET
+/SERVICES/MSSQL\$SQLEXPRESS/"}
    #$tips= $Registry->{"HKEY_LOCAL_MACHINE/SOFTWARE/PMS/"}
      or  die "Can't find the Windows Registry: $^E\n";
    foreach(  keys %$RegHash ) {
        #print "$_: ", $RegHash->{$_}, "\n";
    if ( defined $_ ) {
        print "$_ is defined...\n";
    }
    }

    [download]
    But this will give only if subkey exists...how to get the details of a subkey? Each subkey has Name/Type and Data defined. How do i get these details?
    Basically i want to compare the actual registry key values with the expected( which is maintained in a file).
    Thanks.
[reply]
[d/l]
[reply]
        Thanks...I am able to get the subkey details.
[reply]

In Section Seekers of Perl Wisdom