Win32::FileOp can probably do what you are looking for.
Check out Jenda's site for more information:
http://jenda.krynicky.cz/#Win32::FileOp
Read the docs or this next snippet won't make much sense.
But I use this to get a listing of the disk drive letters on any
particular system that are not removable media (CD, Zip, floppy, etc).
use Win32::FileOp;
%drives = Substed;
foreach $drive (sort keys %drives) {
($substitution, $device) = Substed $drive;
if ($device =~ m/harddiskvolume|harddiskdmvolumes/i) {
push(@DriveLetters,$drive);
} # end of if its a hard drive
} # end of foreach
> -----Original Message-----
> From: hugh s [mailto:[EMAIL PROTECTED]
> Sent: Monday, June 09, 2003 11:14 AM
> To: [EMAIL PROTECTED]
> Subject: GetDrives(), but not on Win95
>
>
> @Drives = Win32::AdminMisc::GetDrives(DRIVE_FIXED);
>
> I can't use the above on a Win9598... box - Roth binary
> requires NT.
>
> How do you do this with the regular Active distribution? Or can you?
>
> Thanks
>
> __________________________________
> Do you Yahoo!?
> Yahoo! Calendar - Free online calendar with sync to Outlook(TM).
> http://calendar.yahoo.com
> _______________________________________________
> Perl-Win32-Admin mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
>
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
