LCUSrv15Notify - WMI sample in Perl

The foundations for Manageability in Windows 2019/2012/2008/ and Windows 10/8/7/Vista/XP are Windows Management Instrumentation (WMI; formerly WBEM) and WMI extensions for Windows Driver Model (WDM).

ActiveXperts Network Monitor provides the ability to build monitor check routines based on WMI. ActiveXperts has collected more than a hundred WMI samples. You can use these samples as a base for new check routines you can write yourself.

On this site, you can find many WMI samples.

The LCUSrv15Notify WMI class can be used in ActiveXperts Network Monitor to monitor your servers.

---

LCUSrv15Notify

Example(s)

use Win32::OLE('in');

my $computer = ".";

my $objWMIService = Win32::OLE->GetObject("winmgmts:\\\\$computer\\root\\CIMV2") or die "WMI connection failed.\n";
my $colItems = $objWMIService->ExecQuery("SELECT * FROM Win32_PerfFormattedData_WRTCESPf_LCUSrv15Notify", "WQL");

foreach my $objItem (in $colItems) {
	print "Caption: $objItem->{Caption}\n";
	print "Description: $objItem->{Description}\n";
	print "Frequency_Object: $objItem->{Frequency_Object}\n";
	print "Frequency_PerfTime: $objItem->{Frequency_PerfTime}\n";
	print "Frequency_Sys100NS: $objItem->{Frequency_Sys100NS}\n";
	print "Name: $objItem->{Name}\n";
	print "Timestamp_Object: $objItem->{Timestamp_Object}\n";
	print "Timestamp_PerfTime: $objItem->{Timestamp_PerfTime}\n";
	print "Timestamp_Sys100NS: $objItem->{Timestamp_Sys100NS}\n";
	print "USrv000NOTIFYssent: $objItem->{USrv000NOTIFYssent}\n";
	print "USrv001NOTIFYssentPerSec: $objItem->{USrv001NOTIFYssentPerSec}\n";
	print "USrv002BENOTIFYssent: $objItem->{USrv002BENOTIFYssent}\n";
	print "USrv003BENOTIFYssentPerSec: $objItem->{USrv003BENOTIFYssentPerSec}\n";
	print "USrv004PresenceNOTIFYssent: $objItem->{USrv004PresenceNOTIFYssent}\n";
	print "USrv005PresenceNOTIFYssentPerSec: $objItem->{USrv005PresenceNOTIFYssentPerSec}\n";
	print "USrv006PresenceWPendingNOTIFYssent: $objItem->{USrv006PresenceWPendingNOTIFYssent}\n";
	print "USrv007PresenceWPendingNOTIFYssentPerSec: $objItem->{USrv007PresenceWPendingNOTIFYssentPerSec}\n";
	print "USrv008RoamingSelfNOTIFYssent: $objItem->{USrv008RoamingSelfNOTIFYssent}\n";
	print "USrv009RoamingSelfNOTIFYssentPerSec: $objItem->{USrv009RoamingSelfNOTIFYssentPerSec}\n";
	print "USrv010RoamingContactNOTIFYssent: $objItem->{USrv010RoamingContactNOTIFYssent}\n";
	print "USrv011RoamingContactNOTIFYssentPerSec: $objItem->{USrv011RoamingContactNOTIFYssentPerSec}\n";
	print "USrv012RoamingACLNOTIFYssent: $objItem->{USrv012RoamingACLNOTIFYssent}\n";
	print "USrv013RoamingACLNOTIFYssentPerSec: $objItem->{USrv013RoamingACLNOTIFYssentPerSec}\n";
	print "USrv014ProvisioningNOTIFYssent: $objItem->{USrv014ProvisioningNOTIFYssent}\n";
	print "USrv015ProvisioningNOTIFYssentPerSec: $objItem->{USrv015ProvisioningNOTIFYssentPerSec}\n";
	print "USrv016ConferencingNOTIFYssent: $objItem->{USrv016ConferencingNOTIFYssent}\n";
	print "USrv017ConferencingNOTIFYssentPerSec: $objItem->{USrv017ConferencingNOTIFYssentPerSec}\n";
	print "USrv018UnsubscribedNOTIFYssent: $objItem->{USrv018UnsubscribedNOTIFYssent}\n";
	print "USrv019UnsubscribedNOTIFYssentPerSec: $objItem->{USrv019UnsubscribedNOTIFYssentPerSec}\n";
	print "USrv020NOTIFYssenttosubscriberinthesamehomeserver: $objItem->{USrv020NOTIFYssenttosubscriberinthesamehomeserver}\n";
	print "USrv021NOTIFYssenttosubscriberinthesamehomeserverPerSec: $objItem->{USrv021NOTIFYssenttosubscriberinthesamehomeserverPerSec}\n";
	print "USrv022NOTIFYssenttosubscriberindifferenthomeserver: $objItem->{USrv022NOTIFYssenttosubscriberindifferenthomeserver}\n";
	print "USrv023NOTIFYssenttosubscriberindifferenthomeserverPerSec: $objItem->{USrv023NOTIFYssenttosubscriberindifferenthomeserverPerSec}\n";
	print "USrv024NOTIFYssentwithoutrequesturibeingset: $objItem->{USrv024NOTIFYssentwithoutrequesturibeingset}\n";
	print "USrv025NOTIFYssentwithoutrequesturibeingsetPerSec: $objItem->{USrv025NOTIFYssentwithoutrequesturibeingsetPerSec}\n";
	print "USrv026NOTIFYssentasaresultofpresencechange: $objItem->{USrv026NOTIFYssentasaresultofpresencechange}\n";
	print "USrv027NOTIFYssentasaresultofpresencechangePerSec: $objItem->{USrv027NOTIFYssentasaresultofpresencechangePerSec}\n";
	print "USrv028NOTIFYssentasaresultofcategorypublish: $objItem->{USrv028NOTIFYssentasaresultofcategorypublish}\n";
	print "USrv029NOTIFYssentasaresultofcategorypublishPerSec: $objItem->{USrv029NOTIFYssentasaresultofcategorypublishPerSec}\n";
	print "USrv030NOTIFYssentasaresultofcontainerchange: $objItem->{USrv030NOTIFYssentasaresultofcontainerchange}\n";
	print "USrv031NOTIFYssentasaresultofcontainerchangePerSec: $objItem->{USrv031NOTIFYssentasaresultofcontainerchangePerSec}\n";
	print "USrv032NOTIFYssentasaresultofsubscriberchange: $objItem->{USrv032NOTIFYssentasaresultofsubscriberchange}\n";
	print "USrv033NOTIFYssentasaresultofsubscriberchangePerSec: $objItem->{USrv033NOTIFYssentasaresultofsubscriberchangePerSec}\n";
	print "USrv034NOTIFYssentasaresultofcontactorgroupchange: $objItem->{USrv034NOTIFYssentasaresultofcontactorgroupchange}\n";
	print "USrv035NOTIFYssentasaresultofcontactorgroupchangePerSec: $objItem->{USrv035NOTIFYssentasaresultofcontactorgroupchangePerSec}\n";
	print "USrv036NOTIFYssentasaresultofpermissionchange: $objItem->{USrv036NOTIFYssentasaresultofpermissionchange}\n";
	print "USrv037NOTIFYssentasaresultofpermissionchangePerSec: $objItem->{USrv037NOTIFYssentasaresultofpermissionchangePerSec}\n";
	print "USrv038NOTIFYssentasaresultofincomingsubscribes: $objItem->{USrv038NOTIFYssentasaresultofincomingsubscribes}\n";
	print "USrv039NOTIFYssentasaresultofincomingsubscribesPerSec: $objItem->{USrv039NOTIFYssentasaresultofincomingsubscribesPerSec}\n";
	print "USrv040NOTIFYssentasaresultofregistrationexpiration: $objItem->{USrv040NOTIFYssentasaresultofregistrationexpiration}\n";
	print "USrv041NOTIFYssentasaresultofregistrationexpirationPerSec: $objItem->{USrv041NOTIFYssentasaresultofregistrationexpirationPerSec}\n";
	print "USrv042NOTIFYssentasaresultofotherreasons: $objItem->{USrv042NOTIFYssentasaresultofotherreasons}\n";
	print "USrv043NOTIFYssentasaresultofotherreasonsPerSec: $objItem->{USrv043NOTIFYssentasaresultofotherreasonsPerSec}\n";
	print "USrv044NOTIFYresponses: $objItem->{USrv044NOTIFYresponses}\n";
	print "USrv045NOTIFYresponsesPerSec: $objItem->{USrv045NOTIFYresponsesPerSec}\n";
	print "USrv046NOTIFYfailuresreceived: $objItem->{USrv046NOTIFYfailuresreceived}\n";
	print "USrv047NOTIFYfailuresreceivedPerSec: $objItem->{USrv047NOTIFYfailuresreceivedPerSec}\n";
	print "USrv048CategoryNOTIFYfailedduetounknownuserorendpoint: $objItem->{USrv048CategoryNOTIFYfailedduetounknownuserorendpoint}\n";
	print "USrv049CategoryNOTIFYtimeoutreceived: $objItem->{USrv049CategoryNOTIFYtimeoutreceived}\n";
	print "USrv050CategoryNOTIFY48xresponsesreceived: $objItem->{USrv050CategoryNOTIFY48xresponsesreceived}\n";
	print "USrv051CategoryNOTIFY504responsesreceived: $objItem->{USrv051CategoryNOTIFY504responsesreceived}\n";
	print "USrv052CategoryNOTIFY500responsesreceived: $objItem->{USrv052CategoryNOTIFY500responsesreceived}\n";
	print "USrv053CategoryNOTIFYfailureresponsesreceived: $objItem->{USrv053CategoryNOTIFYfailureresponsesreceived}\n";
	print "USrv054SelfNOTIFYfailedduetounknownuserorendpoint: $objItem->{USrv054SelfNOTIFYfailedduetounknownuserorendpoint}\n";
	print "USrv055SelfNOTIFYtimeoutreceived: $objItem->{USrv055SelfNOTIFYtimeoutreceived}\n";
	print "USrv056SelfNOTIFY48xresponsesreceived: $objItem->{USrv056SelfNOTIFY48xresponsesreceived}\n";
	print "USrv057SelfNOTIFY504responsesreceived: $objItem->{USrv057SelfNOTIFY504responsesreceived}\n";
	print "USrv058SelfNOTIFY500responsesreceived: $objItem->{USrv058SelfNOTIFY500responsesreceived}\n";
	print "USrv059SelfNOTIFYfailureresponsesreceived: $objItem->{USrv059SelfNOTIFYfailureresponsesreceived}\n";
	print "USrv060LegacypresenceNOTIFYfailedduetounknownuserorendpoint: $objItem->{USrv060LegacypresenceNOTIFYfailedduetounknownuserorendpoint}\n";
	print "USrv061LegacypresenceNOTIFYtimeoutreceived: $objItem->{USrv061LegacypresenceNOTIFYtimeoutreceived}\n";
	print "USrv062LegacypresenceNOTIFY48xresponsesreceived: $objItem->{USrv062LegacypresenceNOTIFY48xresponsesreceived}\n";
	print "USrv063LegacypresenceNOTIFY504responsesreceived: $objItem->{USrv063LegacypresenceNOTIFY504responsesreceived}\n";
	print "USrv064LegacypresenceNOTIFY500responsesreceived: $objItem->{USrv064LegacypresenceNOTIFY500responsesreceived}\n";
	print "USrv065LegacypresenceNOTIFYfailureresponsesreceived: $objItem->{USrv065LegacypresenceNOTIFYfailureresponsesreceived}\n";
	print "USrv066ConferencingNOTIFYfailedduetounknownuserorendpoint: $objItem->{USrv066ConferencingNOTIFYfailedduetounknownuserorendpoint}\n";
	print "USrv067ConferencingNOTIFYtimeoutreceived: $objItem->{USrv067ConferencingNOTIFYtimeoutreceived}\n";
	print "USrv068ConferencingNOTIFY48xresponsesreceived: $objItem->{USrv068ConferencingNOTIFY48xresponsesreceived}\n";
	print "USrv069ConferencingNOTIFY504responsesreceived: $objItem->{USrv069ConferencingNOTIFY504responsesreceived}\n";
	print "USrv070ConferencingNOTIFY500responsesreceived: $objItem->{USrv070ConferencingNOTIFY500responsesreceived}\n";
	print "USrv071ConferencingNOTIFYfailureresponsesreceived: $objItem->{USrv071ConferencingNOTIFYfailureresponsesreceived}\n";
	print "USrv072OtherNOTIFYfailedduetounknownuserorendpoint: $objItem->{USrv072OtherNOTIFYfailedduetounknownuserorendpoint}\n";
	print "USrv073OtherNOTIFYtimeoutreceived: $objItem->{USrv073OtherNOTIFYtimeoutreceived}\n";
	print "USrv074OtherNOTIFY48xresponsesreceived: $objItem->{USrv074OtherNOTIFY48xresponsesreceived}\n";
	print "USrv075OtherNOTIFY504responsesreceived: $objItem->{USrv075OtherNOTIFY504responsesreceived}\n";
	print "USrv076OtherNOTIFY500responsesreceived: $objItem->{USrv076OtherNOTIFY500responsesreceived}\n";
	print "USrv077OtherNOTIFYfailureresponsesreceived: $objItem->{USrv077OtherNOTIFYfailureresponsesreceived}\n";
	print "USrv078FailedtosendNOTIFY: $objItem->{USrv078FailedtosendNOTIFY}\n";
	print "USrv079FailedtosendNOTIFYPerSec: $objItem->{USrv079FailedtosendNOTIFYPerSec}\n";
	print "USrv080NOTIFYtimeouts: $objItem->{USrv080NOTIFYtimeouts}\n";
	print "USrv081NOTIFYtimeoutsPerSec: $objItem->{USrv081NOTIFYtimeoutsPerSec}\n";
	print "\n";
	print "########\n";
	print "\n";
}