RE: (was Re: win32 and win32::Lanman conflicting?)

2002-07-16 Thread Fernando Madruga 


I downloaded Win32::Lanman 1.0.9.2 from CPAN, installed it without any
errors and got the same result.
I'm using ActivePerl 5.6.1.633. Try using Win32::NetAdmin (standard with
ActivePerl) and Win32::AdminMisc (from
http://www.roth.net/perl/adminmisc/). You can install this last module
with the following comand line:

ppm install Win32-AdminMisc --location=http://www.roth.net/perl/packages

I believe that, between these two modules, you'll find what you need.

HTH,
  Fernando Madruga

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]] On Behalf Of
Jason Hemak
Sent: terça-feira, 16 de Julho de 2002 0:06
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: (was Re: win32 and win32::Lanman conflicting?)


Hey Jan (and anyone else with thoughts),

So I did what you said.  Completely uninstalled activeperl, removed the
Perl tree, and then reinstalled activeperl (5.6.1 build 633) and lanman
(1.0.9.2).  I still get the mess at the end of this e-mail.  My program
consists of only this much code:

#! perl -w

use strict;
use diagnostics;

use Win32;
use Win32::Lanman;


Do you have any other thoughts?

Thanks…
Jason


Here’s the gook:

Constant subroutine DACL_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter. pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS',
'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::DACL_SECURITY_INFORMATION () vs none at
C:/Perl/li b/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS',
'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine GROUP_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter .pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS',
'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::GROUP_SECURITY_INFORMATION () vs none at
C:/Perl/l ib/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS',
'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine OWNER_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter .pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS',
'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::OWNER_SECURITY_INFORMATION () vs none at
C:/Perl/l ib/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS',
'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine SACL_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter. pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV ICE_CONTROL_DESCRIPTIONS',
'SERVICE_STATE_DESCRIPTIONS', 'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::SACL_SECURITY_INFORMATION () vs none at
C:/Perl/li b/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION', 'SERV

RE: (was Re: win32 and win32::Lanman conflicting?)

2002-07-16 Thread Scott Campbell 

Hmmm.  I also tried and get all the same errors.  It looks like some of
the calls/procedures/variables are stepping on each other between Win32
and Win32::Lanman.  I keep seeing things below saying they are
redefined...

DACL_SECURITY_INFORMATION redefined

It's a bit over my head, but I'm sure it makes sense to Jan.

Scott

Scott Campbell
Senior Software Developer
Somix Technologies
(207) 324-8805
http://www.somix.com

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]] On Behalf Of
Jason Hemak
Sent: Monday, July 15, 2002 7:06 PM
To: [EMAIL PROTECTED]
Cc: [EMAIL PROTECTED]
Subject: Re: (was Re: win32 and win32::Lanman conflicting?)

Hey Jan (and anyone else with thoughts),

So I did what you said.  Completely uninstalled activeperl, removed the
Perl tree, and then reinstalled activeperl (5.6.1 build 633) and lanman
(1.0.9.2).  I still get the mess at the end of this e-mail.  My program
consists of only this much code:

#! perl -w

use strict;
use diagnostics;

use Win32;
use Win32::Lanman;


Do you have any other thoughts?

Thanks.
Jason


Here's the gook:

Constant subroutine DACL_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter.
pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::DACL_SECURITY_INFORMATION () vs none at
C:/Perl/li
b/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine GROUP_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter
.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::GROUP_SECURITY_INFORMATION () vs none at
C:/Perl/l
ib/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine OWNER_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter
.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::OWNER_SECURITY_INFORMATION () vs none at
C:/Perl/l
ib/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine SACL_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter.
pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::SACL_SECURITY_INFORMATION () vs none at
C:/Perl/li
b/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION',
'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE

Re: (was Re: win32 and win32::Lanman conflicting?)

2002-07-15 Thread Jan Dubois 

On Mon, 15 Jul 2002 13:21:48 +0100, Michael D. Smith
[EMAIL PROTECTED] wrote:


This brings up something I've been wondering about, but it worked so not to 
much:)

When you code, use Win32::whatever; does use Win32; become available also?

No, it doesn't!  Please read `perldoc Win32`.  I've put little [CORE] and
[EXT] markers in there to mark which ones are always available and which
ones require a use Win32; statement in your program.  The external subs
are all defined in Win32.xs from the libwin32 package.  You can see the
corresponding Win32.pm file in \Perl\site\lib\Win32.pm.

Cheers,
-Jan

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Re: (was Re: win32 and win32::Lanman conflicting?)

2002-07-15 Thread Jason Hemak 

Hey Jan (and anyone else with thoughts),

So I did what you said.  Completely uninstalled activeperl, removed the
Perl tree, and then reinstalled activeperl (5.6.1 build 633) and lanman
(1.0.9.2).  I still get the mess at the end of this e-mail.  My program
consists of only this much code:

#! perl -w

use strict;
use diagnostics;

use Win32;
use Win32::Lanman;


Do you have any other thoughts?

Thanks…
Jason


Here’s the gook:

Constant subroutine DACL_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter.
pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::DACL_SECURITY_INFORMATION () vs none at
C:/Perl/li
b/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine GROUP_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter
.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::GROUP_SECURITY_INFORMATION () vs none at
C:/Perl/l
ib/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine OWNER_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter
.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::OWNER_SECURITY_INFORMATION () vs none at
C:/Perl/l
ib/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Constant subroutine SACL_SECURITY_INFORMATION redefined at
C:/Perl/lib/Exporter.
pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7
Prototype mismatch: sub main::SACL_SECURITY_INFORMATION () vs none at
C:/Perl/li
b/Exporter.pm line 57.
Exporter::import('NET_INFO_DESCRIPTION', 'NET_STATUS_DESCRIPTION',
'SERV
ICE_CONTROL_DESCRIPTIONS', 'SERVICE_STATE_DESCRIPTIONS',
'SERVICE_CONTROLS', 'SE
RVICE_START_TYPES', 'SERVICE_ERROR_TYPES', 'SC_FAILURE_ACTIONS', ...)
called at
C:\Perl\scripts\testprog.pl line 7
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 7
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 7

-Original Message-
From: Jan Dubois [mailto:[EMAIL PROTECTED]]
Sent: Monday, July 15, 2002 6:32 PM
To: Jason Hemak
Cc: [EMAIL PROTECTED]
Subject: Re: (was Re: win32 and win32::Lanman conflicting?)

On Mon, 15 Jul 2002 22:22:42 GMT, Jason Hemak [EMAIL PROTECTED]
wrote:

Hi Jason,

Well now i'm more confused about my original problem.

If you need to use Win32 to use all of that functionality, how do you use
both