RE: List user account associated with Services

[Bullock, Howard A.]

Title: List user account associated with Services

use Win32::Lanman;  if(!Win32::Lanman::QueryServiceConfig("", '', 'browser', \%config))  {         print "Sorry, something went wrong; error: ";         # get the error code         print Win32::Lanman::GetLastError();         exit 1;  }  for $key (sort keys %config)  {         if($key eq "dependencies")         {                 $dependencies = $config{$key};                 print "\t$key = ", $#$dependencies + 1, "\n";                 foreach $dependency (@$dependencies)                 {                         print "\t\t$dependency\n";                 }         }         else         {                 print "\t$key = $config{$key}\n";         }  }   Howard A. Bullock Global IT Infrastructure 717-810-3584   -----Original Message----- From: Ricci, Mark [mailto:[EMAIL PROTECTED]] Sent: Monday, February 10, 2003 11:41 AM To: Perl-Win32-Users Mailing List Subject: List user account associated with Services   Hello All,         I need some advice in choosing a module(s) that would:         1. Will run against a NT 4.0 server and report back a listing of all the services running on it and the user accounts that are associated with its startup.         2. Run this query against a remote server.         Most likely a Roth module(s), but looking for advice from somebody that has tried  something similar.   Thanks in advance, Mark   This e-mail message is for the sole use of the intended recipient(s) and may contain confidential and/or privileged information.  Any review, use, disclosure or distribution by persons or entities other than the intended recipient(s) is prohibited.  If you are not the intended recipient, please contact the sender by reply and destroy all copies of the original message. Thank you. WordWave, Capturing the Power of the Spoken Word http://www.wordwave.com