Hey all,

I have a question about the below script I am writing/copying.

#!\\server\perl
net use w: \\server\perl
use Win32::Registry;
my $Register =
"Software\\INTEL\\LANDesk\\VirusProtect6\\CurrentVersion";
my $hkey,SubKey;  #Why is this needed??

$HKEY_LOCAL_MACHINE->Open($Register,$hkey)|| die $!;  # I understand
$Register, but why the use of $hkey? What is being stored in this
scalar?
$hkey->DeleteKey("Clients");
alarm(5); # Is this a correct way to pause the script?
$hkey->Create("Clients",$SubKey); #Same question here. It relates to the
declaration above obviously but what is being stored in $SubKey?
$hkey->Close();
net use w: /delete

Wouldn't it be just as easy to use:

use Win32::Registry;
my $Register =
"Software\\INTEL\\LANDesk\\VirusProtect6\\CurrentVersion";
$HKEY_LOCAL_MACHINE->Open($Register)|| die $!;  
$hkey->DeleteKey("Clients");
$hkey->Close();

Thanks 

AD

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to