Try this:
#!perl.exe -w
use strict;
use Win32API::File qw( :ALL );
my @drives = getLogicalDrives();
my %Types =
0 => 'DRIVE_UNKNOWN',
1 => 'DRIVE_NO_ROOT_DIR',
2 => 'DRIVE_REMOVABLE',
3 => 'DRIVE_FIXED',
4 => 'DRIVE_REMOTE',
5 => 'DRIVE_CDROM',
6 => 'DRIVE_RAMDISK',
);
foreach
On Wed, 25 Apr 2001, Jeff Shanholtz wrote:
> I want to run a command and pipe its output to my perl script (`command`
> won't work because the command takes a long time and produces tons of
> output). However, I really need to know the exit code when it's done
> (ala system()/256). Is it possible
Eric Mosley wrote:
> Whats the best way to seed the random number generator on Win2000?
If you're using a Perl version 5.004 or later, nothing.
rand() calls srand() automatically the first time it's used, supplying "a
semi-random value supplied by the kernel (if it supports the /dev/urandom
devi
Eric Mosley wrote:
>
> Hi,
>
> Whats the best way to seed the random number generator on Win2000?
Just let Perl do it for you. see perlfunc in the docs on your hard disk.
BTW, please quote only the relevant part of the message you are replying
to, and it makes it easier to read if you put your
Title: FW: OLE and Exchange - GetObject fails 0x8007203a connecting to LDAP source
I had find the solution, follow is correct
code.
%attrs = ( "activities", {"a",["newsletter1",
"newsletter2"]} );
ldap_modify_s($ld,$dn,\%attrs);
and another question is:
I want to parser a l
Jeff Shanholtz wrote:
> I want to run a command and pipe its output to my perl script
> (`command` won't work because the command takes a long time
> and produces tons of output). However, I really need to know
> the exit code when it's done (ala system()/256). Is it possible?
It should be possi
While I never got around to posting this problem to this mail list, it has
been troubling me for some time and I found a resolution and thought I'd
share it.
The problem:
I've wrote a simple script that uses LWP::UserAgent to automate some form
posting. It works fine as a .pl, but after using P
> Does anyone know if 5.005 is the newest version of JPerl? (Japanese
> version)
Maybe Yes, see:
http://www.shonanblue.ne.jp/~kipp/perl/jperl/index.html
> Is there any plans for 5.6 JPerl?
Maybe No.
The author Mr. SUZUKI Norio seems to think it's not needed.
--
Hirosi Taguti
[EMAIL PROTECTED]
Hi,
Whats the best way to seed the random number generator on Win2000?
Eric
> -Original Message-
> From: Carl Jolley [mailto:[EMAIL PROTECTED]]
> Sent: 25 April 2001 20:42
> To: Eric Mosley
> Cc: [EMAIL PROTECTED]
> Subject: Re: DBM on windows
>
>
> On Wed, 25 Apr 2001, Eric Mosley wrot
-start-
> Asif Kaleem <[EMAIL PROTECTED]>
>at04/26/2001 09:37 AM
>Hello Gang:
>I am in a process of writing a Perl program that has the following
requirement.
>$DumpDevicesDrive = "F";
>This variable is read from a configuration file if this variable has a
value we
>proceed on, if this
In the below code, I don't see the $_ being used, but I do see a $a,
wouldn't one have to do this:
foreach my $a(@foo) {
if ($a =~ /ABC-$i/) {
print $a . "\n";
}
}
it is early, but I think that may be the issue.
Scott
-Original Message-
From: Joe Schell [mailt
11 matches
Mail list logo
