Yes.
Look for the tieregistry module.
It has what you need to perform remote reqistry calls.
Note: there processor speed info is not 100% accurate.
Win9x does not have information in the registry....
Here is a sub from a script I wrote.
sub CpuSpeed {
my $machine = shift or die "Could not get a Machine for CpuSpeed\n";
my $key;
my $speed;
if ($key =
$Registry->Open("//$machine/LMachine/HARDWARE/DESCRIPTION/System/" .
"CentralProcessor/0/", {Access=>KEY_READ}) ) {
if ($speed = $key->GetValue("~MHZ")) {
$speed = int((( int ( hex ($speed) / 5 ) + 1 )
* 5 ) );
} else {
$speed = "*?*";
}
}
return($speed);
}
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
