I found my own answer. Thanks all, for the pointers to the correct
locations...
After digging deeper into a couple of web sites, I was able to find this
site:
http://www.le-berre.com/perlser.htm
<http://www.le-berre.com/perlser.htm>
It is a guide called, "How To Win32 & Perl 5". Included is a section on the
Service module. If you type exactly as the examples show, then the Service
Module works. Apparently, there is a very precise syntax issue when
referring to the computer (HostName). You must use single quotes and
four back-slashes when using the exact HostName, or double quotes and
four back-slashes when using interpreted HostNames. This is what made
my script completely fail.
Oh, by the way, I also found ADSI help from my Visual Basic partner.
While I can't seem to enumerate the Services from the VB example, I
can - and now do - use ADSI calls in my administrative task. All this
is wrapped in a nice, tidy Tk GUI, for my network admins.
Again, thanks for pointing me in the right direction.
-Dwight
-----Original Message-----
From: Oakey, Dwight [mailto:[EMAIL PROTECTED]]
Sent: Thursday, November 02, 2000 6:13 PM
To: 'ActivePerl Mailing List'
Subject: Help please, again.
"So little to do, and so much time to do it in...
No, wait - reverse that." - Willie Wonka
Well, I'm fighting a tight deadline and I'm having trouble
with
Win32::Service. I'm trying to write a program that will
check
services, stop them, change their account password, and then
start them back up. I've got all the logic, but this Module
doesn't see to work right. First off, it reports some
services
that are Stopped as Running, and others that are Running it
says are Stopped. And the big kicker is that I can't, for
the
life of me, figure out how to Stop or Start a Service. The
commands don't seem to work. $? returns a 0 (fail code),
and $! returns nothing (it's a blank line.)
I have one day left to complete this assignment. Please,
can
someone help me out? After some of what I've been reading
today, I'm wondering if I have a bad module. Here are the
data I could find for you:
perl, v5.6.0, Build 613
Win32-Service.zip, created 6/8/00
Service.pm, created 3/14/00
Service.pm version 0.04, written by Douglas
Lankshear and Gurusamy
Sarathy
Is it acceptable for me to e-mail one or both of these guys,
directly?
Can or should I try to update either my Perl or my
Service.pm?
Thanks, all.
Dwight T. Oakey, Enterprise Network Engineer
ENTEX IT Service - RNS
Mason, Oh.
Phone: (513) 573-9174 x4537
Pager: 888-452-0646 or [EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED]>
Fax: (513) 336-1979
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
