Leser: 1
|  |  | 2 Einträge, 1 Seite | 
1
2
3
4
5
6
7
8
9
10
11
12
$delimiter = $Registry->Delimiter("/");
$diskKey =$Registry->{"/LMachine/Software/Microsoft/Windows/
CurrentVersion/Uninstall"}
    or  die "Can't read Path key: $^E\n";
foreach $entry (  keys(%$diskKey)  ) {
 print "Key: $entry ";
  
    foreach $subKey (  $diskKey->SubKeyNames  ) {
    print   "subKey: $subKey";
    }
}print $diskKey->{$subKey}|  |  | 2 Einträge, 1 Seite |