This prooves that I am getting lazier day by day:)!! -----Original Message----- From: Timothy Johnson [mailto:[EMAIL PROTECTED]] Sent: Friday, May 24, 2002 10:39 AM To: Shishir K. Singh; 'Arul, Rex ' Cc: '[EMAIL PROTECTED] ' Subject: RE: Gettting Drives on Windows
You can get it from Dave Roth's PPM Repository. He has some other useful modules there as well. PPM> set repository dave http://www.roth.net/perl/packages PPM> set save PPM> install win32-adminmisc -----Original Message----- From: Shishir K. Singh To: Arul, Rex Cc: [EMAIL PROTECTED] Sent: 5/24/02 7:34 AM Subject: RE: Gettting Drives on Windows Thanks Arul..for the timebeing this works fine . However, I would like to explore the module that you mentioned "Win32::AdminMisc". Didn't find it on CPAN. Do you have any idea of it's location. -----Original Message----- From: Arul, Rex [mailto:[EMAIL PROTECTED]] Sent: Friday, May 24, 2002 10:23 AM To: Shishir K. Singh Cc: [EMAIL PROTECTED] Subject: RE: Gettting Drives on Windows If it is fixed drives, you can use the Win32::NetAdmin module: C:\Perl\rex>perl -MWin32::NetAdmin -e "Win32::NetAdmin::GetServerDisks('', \@arr); print qq[Fixed Drives in this Machine are: \n];for(@arr){ print qq[$_\n];}" Fixed Drives in this Machine are: A: C: D: Please note that this module does not give Mapped-Drives and it does not distinguish between hard/floppy/CD drives. Am not sure, if you need extended functionality, but if you do, I guess there is a module called Win32::AdminMisc, with a function to specify type of drives desired.I have not tried that module, yet. Thanks, Rex -----Original Message----- From: Shishir K. Singh [ mailto:[EMAIL PROTECTED]] Sent: Friday, May 24, 2002 10:08 AM To: begin begin Subject: Gettting Drives on Windows Hi, Sometime back, someone had posted the module to get the drives on Windows system on my request. Think it was either Nikola Janceski or Beau Cox. Could you pls resend the zipped file or the link to it. Appreciate it!! Thanks Shishir -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
