From: "Federico, Chris" <[EMAIL PROTECTED]>
>  My code is this :
> 
> I'm just trying to capture my Services on my machine . 
> 
> #!/usr/bin/perl - w
> 
> use Win32::Service;
> use diagnostics;

You forgot

        use strict;
 
> my $hostname = hpgwcfede2;

Please enclose your string constants in quotes!

        my $hostname = 'hpgwcfede2';

> my %hash;
> 
> 
> Win32::Service::GetServices($hostname,%hash);

You have to pass a reference to a hash, not the hash itself:

        Win32::Service::GetServices($hostname,\%hash);

Jenda
=========== [EMAIL PROTECTED] == http://Jenda.Krynicky.cz ==========
There is a reason for living. There must be. I've seen it somewhere.
It's just that in the mess on my table ... and in my brain
I can't find it.
                                        --- me


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to