please dont rip this site



Registry manipulation

use Win32::Registry;
qx(regedit /s "c:\\Program Files\\Microsoft Office\\Office\\power.reg);
$main::HKEY_CURRENT_USER->Open("Software\\Microsoft", $Microsoft) || die "Can't open Software\\Microsoft key: $!\n";
$Eight = MakeTree($Microsoft, "Office\\8.0");
foreach $key (@Eight) {    
	$Key->SetValue("Default", REG_SZ, $HomeDir);
	if (%KeyVals) {
	     $KeyVal = $KeyVals{""};
             $AutoGrammer = $KeyVals{"AutoGrammar"};
	} else {
		$Key->SetValueEx("AutoGrammar", 0, REG_SZ, "0");
		$Key->SetValueEx("Run Already", 0, REG_DWORD, "1");

     # Create multilevel hive structure
     sub MakeTree {
         my ($SubTree, $Path) = @_;
         $Path =~ s#^\\##;
         my (@KeyList) = split(/\\/, $Path);
         my $key;
         my $RegKey = $SubTree;
         foreach $key (@KeyList) {
     #        print "Key being created is: $key\n";
             $RegKey->Create($key, $RegKey)
                || die "Can't create $key key: $!\n";
         return $RegKey;

See also:

file: /Techref/language/perl/win32reg.htm, 1KB, , updated: 2001/4/25 11:30, local time: 2018/11/18 23:08,

 ©2018 These pages are served without commercial sponsorship. (No popup ads, etc...).Bandwidth abuse increases hosting cost forcing sponsorship or shutdown. This server aggressively defends against automated copying for any reason including offline viewing, duplication, etc... Please respect this requirement and DO NOT RIP THIS SITE. Questions?
Please DO link to this page! Digg it! / MAKE! / 

<A HREF=""> Perl Win32 Registry</A>

After you find an appropriate page, you are invited to your to this massmind site! (posts will be visible only to you before review) Just type in the box and press the Post button. (HTML welcomed, but not the <A tag: Instead, use the link box to link to another page. A tutorial is available Members can login to post directly, become page editors, and be credited for their posts.

Link? Put it here: 
if you want a response, please enter your email address: 
Attn spammers: All posts are reviewed before being made visible to anyone other than the poster.
Did you find what you needed?


Welcome to!

Site supported by
sales, advertizing,
& kind contributors
just like you!

Please don't rip/copy
(here's why

Copies of the site on CD
are available at minimal cost.

Welcome to!