RE: win32 and win32::Lanman conflicting?

2002-07-15 Thread Hill, David K

Jason,

How did you come about the Win32::Lanman Module?   This does not appear to
be standardized module...

-David

David K Hill
Enterprise Internal Issue Management Solutions
Sr Systems Engineer
eBG 
Intel Corporation 



-Original Message-
From: Jason Hemak [mailto:[EMAIL PROTECTED]] 
Sent: Sunday, July 14, 2002 4:31 PM
To: [EMAIL PROTECTED]
Subject: win32 and win32::Lanman conflicting?

I am writing some of my first perl programs.  In one program, I have:

---8<---
#! perl

use Win32;
use Win32::Lanman;


right now and nothing more (since i stripped the useful code out to try to
sort out my problem).  Basically, when I put that code through perl I get a
load of errors like what you see below.  When i have just one of the "use"
statements in there I do not receive any of these messages.  Am I
"including" these packages incorrectly, or is there anything else I need to
do to resolve these warnings?  I have tried ppm with the command query
verify --upgrade and all of my installed packages are reported as the most
current version.

Thank you!
Jason

---8<---
C:\Perl\scripts>testprog.pl
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 6
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 6
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 6
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 6
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 6
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 6
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 6
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 6
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 6
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 6
main::BEGIN() called at C:/Perl/site/lib/Win32/Lanman.pm line 6
eval {...} called at C:/Perl/site/lib/Win32/Lanman.pm line 6

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



RE: Strange change in WinNT environment: File association to .PL now give error message

2002-07-15 Thread Cutts III, James H.
Title: RE: Strange change in WinNT environment: File association to .PL now give error message



Fernando,
 
Thanks 
for the suggestion.  Unfortunately, the associations and file typing are 
correct:

  D:\Projects\Perl>ASSOC .PL.PL=Perl
   
  D:\Projects\Perl>FTYPE PERLPERL="D:\BIN\Perl\bin\perl.exe" "%1" 
  %*
And 
I'm still getting that weird error: "The Windows Installer failed to install the program associated 
withthis file.  Please contact your system 
administrator."
 
James.
 -Original Message-From: 
Fernando Madruga [mailto:[EMAIL PROTECTED]]Sent: Friday, July 12, 2002 
19:25To: 'Perl Win32 Users (E-mail)'Subject: RE: Strange 
change in WinNT environment: File association to .PL now give error 
message

  Try: ASSOC .PL=Perl FTYPE 
  Perl="C:\Perl\bin\perl.exe" "%1" %*Before actually doing that, just 
  check what the current values are: ASSOC .PL FTYPE 
  WhateverYouGetAsTheResultOfThePreviousLineHTH,  Fernando 
  Madruga-Original Message-From: 
  [EMAIL PROTECTED][mailto:[EMAIL PROTECTED]] 
  On Behalf OfCutts III, James H.Sent: sexta-feira, 12 de Julho de 2002 
  13:42To: Perl Win32 Users (E-mail)Subject: Strange change in WinNT 
  environment: File association to .PLnow give error messageThe 
  other day, I was working with PPM3 getting the libwww-perl moduleand 
  familiarizing myself with PPM3.  Everything worked fine.  
  However,and it may not be actually related to PPM3, when I finished 
  working withPPM3 and returned to the DOS prompt, I found that I could not 
  longer runPERL scripts directly from the command line.  Prior to my 
  excursion intothe world of PPM3, I would type, for example, 
  Question_load.pl at thecommand prompt and Question_load.pl would compile 
  and run.  Now itdoesn't.  Instead I get an error dialog message 
  box with the message:"The Windows Installer failed to install the program 
  associated withthis file.  Please contact your system 
  administrator."  After clickingthe OK button, I get in the DOS 
  window, "Access Denied".  However,fortunately, and strangely, typing: 
  perl Question_load.pl worksperfectly.Any suggestions on what 
  happened and how to fix it?  I liked being ableto just type the 
  script name again.BTW, I'm using  v5.6.1 Build 631 for 
  MSWin32-x86-multi-thread on an WinNT4 
  SP6James 
  H. Cutts 
  III    
  Integrated Technology ServicesComputer Project 
  Manager  Research and 
  Education SupportPhone: (573) 
  882-6181 
  University of Missouri - ColumbiaFAX:   [573] 
  884=8192 
  DC017.00,  265H 
  Quarterdeck  
  Columbia, MO  65212E-Mail: 
  [EMAIL PROTECTED]___Perl-Win32-Users 
  mailing list [EMAIL PROTECTED]To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs___Perl-Win32-Users 
  mailing list[EMAIL PROTECTED]To unsubscribe: 
  http://listserv.ActiveState.com/mailman/mysubs


ActiveState's Archive-Zip.zip doesn't (?!) support Windows

2002-07-15 Thread Thomas R Wyant_III


All -

While investigating Randy Kobes' PPM::Make package, I discovered that the
copy of Archive-Zip.zip
http://www.activestate.com/PPMPackages/zips/6xx-builds-only/ supports only
sun4-solaris-thread-multi and i686-linux-thread-multi. No Win32. If I use
PPM to acquire the module directly (i.e.: PPM instaill Archive::Zip) it
works fine under Windows 2000.

I believe from previous traffic on this list that ActiveState's PPM archive
is built "automagically" from CPAN. So who do I see to get this one module,
last built in 2000, corrected?

Thanks,
Tom Wyant

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



FILEHANDLE Problem

2002-07-15 Thread steve silvers

This is going to drive me nuts I have my test snippet below

#!/Perl

When I run this as shown below, I get the error: Invalid argument.

open(FILE, "d:\path_to\textfiles\test.txt") or die "Can't open $!";

if(eof(FILE)) {
print "IM EMPTY";
}
else {
while () {
chomp;
print;
}
}

When I run it as:
open(File, "../textfiles/test.txt")

I get file or directory not found. Now I know that all is well and the file 
exists. I come out of the cgi-bin, and into the textfiles directory, and get 
the test.txt file. But to no prevail.

Any suggestions greatly appreciated.
Steve.

_
MSN Photos is the easiest way to share and print your photos: 
http://photos.msn.com/support/worldwide.aspx

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



RE: FILEHANDLE Problem

2002-07-15 Thread Morse, Richard E.

steve silvers [mailto:[EMAIL PROTECTED]] wrote:

> open(FILE, "d:\path_to\textfiles\test.txt") or die "Can't open $!";

So, um, you do know that \t is a tab in double-quoted text?

Try:
open(my $file, "d:/path/to/your/test.txt") or die("Can't open: $!")

or:
open(my $file, "d:\\path\\to\\your\\text.txt") or die("Can't open:
$!")

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



RE: FILEHANDLE Problem

2002-07-15 Thread Scot Robnett

Check the capitalization of your filehandle. You open the filehandle as
FILE, then you try to find it with File. In the case of handles, case is
important.

You're doing this:

open(File, "../textfiles/test.txt");

Try this instead:

open(FILE, "../textfiles/test.txt");


HTH,

Scot Robnett
inSite Internet Solutions
[EMAIL PROTECTED]
http://www.insiteful.tv




-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
steve silvers
Sent: Monday, July 15, 2002 11:59 AM
To: [EMAIL PROTECTED]
Subject: FILEHANDLE Problem


This is going to drive me nuts I have my test snippet below

#!/Perl

When I run this as shown below, I get the error: Invalid argument.

open(FILE, "d:\path_to\textfiles\test.txt") or die "Can't open $!";

if(eof(FILE)) {
print "IM EMPTY";
}
else {
while () {
chomp;
print;
}
}

When I run it as:
open(File, "../textfiles/test.txt")

I get file or directory not found. Now I know that all is well and the file
exists. I come out of the cgi-bin, and into the textfiles directory, and get
the test.txt file. But to no prevail.

Any suggestions greatly appreciated.
Steve.

_
MSN Photos is the easiest way to share and print your photos:
http://photos.msn.com/support/worldwide.aspx

___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.372 / Virus Database: 207 - Release Date: 6/20/2002

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.372 / Virus Database: 207 - Release Date: 6/20/2002

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



RE: FILEHANDLE Problem

2002-07-15 Thread henry isham

Try this...
 
open(FILE, "d:\\path_to\\textfiles\\test.txt") or die "Can't open $!";
 
Or,
 
open(FILE, 'd:\path_to\textfiles\test.txt') or die "Can't open $!";
 
-Henry

-Original Message- 
From: steve silvers [mailto:[EMAIL PROTECTED]] 
Sent: Mon 7/15/2002 12:58 PM 
To: [EMAIL PROTECTED] 
Cc: 
Subject: FILEHANDLE Problem


This is going to drive me nuts I have my test snippet below

#!/Perl

When I run this as shown below, I get the error: Invalid argument.

open(FILE, "d:\path_to\textfiles\test.txt") or die "Can't open $!";

if(eof(FILE)) {
print "IM EMPTY";
}
else {
while () {
chomp;
print;
}
}

When I run it as:
open(File, "../textfiles/test.txt")

I get file or directory not found. Now I know that all is well and the file
exists. I come out of the cgi-bin, and into the textfiles directory, and get
the test.txt file. But to no prevail.

Any suggestions greatly appreciated.
Steve.

_
MSN Photos is the easiest way to share and print your photos:
http://photos.msn.com/support/worldwide.aspx

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


z¹VŠ}öRÇ«²f¢–)à–+-=êåZ)÷ÙK®Éb²Û®ð¶+ÞJÖ­yÊ&N‹§²æìr¸›zm§ÿåŠËlz»Àrدy+Zµç(›ùšŠYšŸù²²æì


Split function

2002-07-15 Thread Mangesh Paranjape




Forwarded on behalf of Moshe:
I would like to know if this is OK?
@array = split(/(--|;)/,$var);
I would like to split on either a double dash or a semi colon with one split 
using ( | ).
Is that viable, or do I have to test for either one, and split 
accordingly.
Thanks.
A friend of Mangesh 
 
 
 
 
 


Re: Split function

2002-07-15 Thread Ron Grabowski

> I would like to split on either a double dash or a semi colon with one
> split using ( | ).

$_ = 'Hello-world;how--are--you;today';

print join "\n", split /--|;/;
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



RE: Split function

2002-07-15 Thread Scot Robnett

Would it be only semantic to escape the semicolon, or could it cause a
problem not to do so? I'm not asking to be picky, I really don't know. :)

Scot R.
inSite



-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of Ron
Grabowski
Sent: Monday, July 15, 2002 1:20 PM
To: [EMAIL PROTECTED]
Subject: Re: Split function


> I would like to split on either a double dash or a semi colon with one
> split using ( | ).

$_ = 'Hello-world;how--are--you;today';

print join "\n", split /--|;/;
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.372 / Virus Database: 207 - Release Date: 6/20/2002

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.372 / Virus Database: 207 - Release Date: 6/20/2002

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



RE: FILEHANDLE Problem

2002-07-15 Thread Fernando Madruga

> This is going to drive me nuts I have my test snippet below

> When I run this as shown below, I get the error: Invalid argument.

> open(FILE, "d:\path_to\textfiles\test.txt") or die "Can't open $!";

You need to replace each \ with \\ as a single \ will be interpreted as
an escape character.
Alternatively, use ' (single quotes) instead of " (double quotes) as
single quotes don't interpolate.

> When I run it as:
> open(File, "../textfiles/test.txt")

Are you sure that the starting directory is correct? That the user
account your script runs under has access to it?

HTH,
  Fernando Madruga

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



RE: Strange change in WinNT environment: File association to .PL now give error message

2002-07-15 Thread Fernando Madruga


> Fernando,
> Thanks for the suggestion.  Unfortunately, the associations and file
typing are correct:

Well, I'm out of sugestions here. Other than trying to "upgrade" your
current version to the same one, that is, reinstalling ActivePerl, but
that you probably already tried...

Bye,
  Fernando Madruga

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



Re: Split function

2002-07-15 Thread $Bill Luebkert

Mangesh Paranjape wrote:
> Forwarded on behalf of Moshe:
> 
> I would like to know if this is OK?
> 
> @array = split(/(--|;)/,$var);
> 
> I would like to split on either a double dash or a semi colon with one 
> split using ( | ).
> 
> Is that viable, or do I have to test for either one, and split accordingly.

To Moshe and other newbie posters:

This is kind of a silly question.  Why ?  Because it would take but 2-3
minutes to test the premise instead of waiting for hours for a list response.

You need to take a little initiative and test these things on your own.
Plus you'll learn more by a little trial and error and save a lot of bandwidth.

Try your code above and use Data:Dumper (or just print the @array in quotes)
to determine what results you got.

Everyone posting to the list should weigh the time involved to test something
against the amount of time for thousands of list members to read/delete your
message.  I've never posted to the list for core Perl help and never had a
Perl class, but somehow I manage to write Perl programs that get the job done.
Sometimes it can take hours to work out a problem and you have to at least
make the effort before asking for help.

If you've already tested several ways and are still stumped, then by all means
ask the list for help - that's what it's there for.  I don't think it's there
to do your learning/testing for you though - we all need to do a lot of that
on our own to become proficient.

Also consider the Perl beginners list at Yahoo groups until you get comfortable
with Perl.
-- 
   ,-/-  __  _  _ $Bill Luebkert   ICQ=162126130
  (_/   /  )// //   DBE Collectibles   Mailto:[EMAIL PROTECTED]
   / ) /--<  o // //  http://dbecoll.tripod.com/ (Free site for Perl)
-/-' /___/_<_http://www.todbe.com/

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



DBI::XBase

2002-07-15 Thread Kevin

Hello,

I am getting unreliable behavior from using DBI::XBase and am trying to get
to the bottom of it.

Besides the .dbf files, should any other files be in the directory that I am
pointing to (such as .cdx, etc.)? Any pointers in working with XBase?

The behavior I am getting is that the computer freezes and I have to reset
the machine.

Thanks in advance.

Kevin.
[EMAIL PROTECTED]

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



Re: Passing a GUID to Win32::OLE

2002-07-15 Thread Jan Dubois

On Sun, 14 Jul 2002 15:56:07 +0100, [EMAIL PROTECTED] wrote:

>
>Anybody know a way to call a method which takes a REFCLSID, like this:
>
>HRESULT foo( REFCLSID bar );
>
>The OLE browser shows this as
>
>Sub foo( bar as GUID )
>method foo;
>
>Unfortunately, Win32::GuidGen seems to return a GUID in string form,
>and calling foo results in an "Invalid parameter" 0x80070057 :-(

There isn't a predefined VARIANT type for GUIDs, so I wouldn't know how
this parameter needs to be passed by OLE Automation.  Looking at the
native interface is no use; you have to check the IDispatch interface to
see what parameters foo() expects.  Or does the application also define a
GUID object?  In that case you need to create an instance of that and pass
a reference to it.

Cheers,
-Jan

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



Re: Split function

2002-07-15 Thread Ron Grabowski

> Would it be only semantic to escape the semicolon, or could it cause a
> problem not to do so? I'm not asking to be picky, I really don't know. :)

The semi-colon is not special unless you do something like this:

 m;foo|bar|\;;
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs



Re: ActiveState's Archive-Zip.zip doesn't (?!) support Windows

2002-07-15 Thread Jan Dubois

On Mon, 15 Jul 2002 11:46:51 -0400, "Thomas R Wyant_III"
<[EMAIL PROTECTED]> wrote:

>I believe from previous traffic on this list that ActiveState's PPM archive
>is built "automagically" from CPAN. So who do I see to get this one module,
>last built in 2000, corrected?

I've told Neil about this just now and he'll look into it (eventually).
In general, messages about the PPM repository should go to
[EMAIL PROTECTED]

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 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 Jan Dubois

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 Win32 and other packages like Win32::Lanman without getting all those
>errors like I was originally describing?

I have no idea why you got those errors; it looks like you may have
installed an incompatible version of Win32::Lanman.  You may want to do
remove ActivePerl from your system, explicitly remove the whole Perl tree
and then reinstall ActivePerl and the latest Win32::Lanman from CPAN.
Make sure you install the correct version of the DLLs etc. and see if the
error goes away.

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
>bo