I would use GetServers using SV_TYPE_WORKSTATION
then query the remote registry for the product type.
my $ProductProfileKey =
$HKLM->Open('SYSTEM\CurrentControlSet\Control\ProductOptions');
my $ProductType = $ProductProfileKey->GetValue("ProductType");
if($ProductType ne "WinNT")
{
# Do Something...;
}
Valid product options: LanmanNT (domain controller), ServerNT (Member
Servers), and WinNT (workstations).
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
