Hi -
Just tried this:
use strict;
use Win32::Service;
my %services;
if (Win32::Service::GetServices ('', \%services)) {
print "$_\n" for (sort keys %services);
}
else {
print "GetServices failed\n";
}
It worked fine.
According to the documentation, Win32::Service is
Contained in libwin32-0.18.
I am using ActivePerl (5.6.1), which comes bundled with libwin32, on a W2K
machine.
What is your configuration? If you are ActivePerl, you may want to PPM
verify and/or install libwin32...
Aloha - Beau.
-----Original Message-----
From: Khoury, Chris C SEOP-OEIRN [mailto:[EMAIL PROTECTED]]
Sent: Thursday, May 16, 2002 11:26 PM
To: '[EMAIL PROTECTED]'
Subject: Getting "Can't locate Win32/Service.pm"
Whilst using;
use Win32::Service;
Any ideas on how to diagnose?
Chris Khoury
Operational Support
Shell International Petroleum Company Limited
Shell Centre, London SE1 7NA, United Kingdom
Tel: +44 (0)20 7934 4190 Fax: 7351
Email:
Internet: http://www.shell.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
