Hello Rob,
Actually, I initially thought that because of the volume of the data (it
fetches around 60k records so) I had an impression that it might take
some time, but your statement has raised an alarm to me.
Also, last night the job failed again but this time I have captured the
error successfully (hopefully).
if(!Win32::Lanman::NetUserEnum("$PDC", &FILTER_NORMAL_ACCOUNT,
[EMAIL PROTECTED]))
{
print "Sorry, something went wrong; error: ";
# get the error code
print Win32::Lanman::GetLastError();
}
Result:
"Sorry, something went wrong; error: 53"
There is no indication of slowness of LAN atleast during day time. (As
the job runs during night time, I ll have to check this point as well)
I am wondering for the findings on "what has changed". If you could
clearly specify what exactly I have to look apart from the different
versions I have specified earlier. Also, you might be true that there is
no problems with the module or Perl as AdminMisc is also failing (I have
already tried with it :-))
Thanks and Regards,
Shailja Agrawal
-----Original Message-----
From: Sisyphus [mailto:[EMAIL PROTECTED]
Sent: Wednesday, May 18, 2005 12:00 PM
To: [EMAIL PROTECTED];
[email protected]
Subject: Re: win32::Lanman Error
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[email protected]>
Cc: <[EMAIL PROTECTED]>
Sent: Tuesday, May 17, 2005 4:57 PM
Subject: RE: win32::Lanman Error
> Hi Rob,
>
> Win32::GetLastError() did the trick. Thank you for the same.
>
> But still the script takes 4 hours to fetch the data. Do you have any
> suggestions here.
>
Are there any other examples of slowness in the normal running of the
lan ?
Has it always taken that long ? If this problem is something that has
developed just recently then you should try to find out what changed.
If it has always taken that long, then I don't know what to think .....
except that it's probably not a perl problem.
If you think that it *is* a perl problem, then you could use either
Win32::AdminMisc (from http://www.roth.net/perl/ ) or Win32::NetAdmin
(don't
know where you get that one) instead of Win32::Lanman - but, imo, it's
unlikely that either of them will solve your problem.
I must say that I admire your patience in waiting for 4 hours for
something
that should take a few seconds :-)
Cheers,
Rob
_______________________________________________
Perl-Win32-Users mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
