Re: Is there any module to get the cdrom infomation?



On Jul 29, 2:35 pm, "lofenee" <lofe...@xxxxxxxxx> wrote:
I want to check whether a cdrom node under /dev actually exists.

Win32::AdminMisc

GetDrives([$Type])

This will return an array of drive roots. If no parameters are passed
then the list will be all drives (cdroms, floppy, fixed, net, etc.).
If you specify $Type the list will only contain drive roots that are
of the specified type.
The types are:

DRIVE_FIXED
DRIVE_REMOVABLE
DRIVE_REMOTE
DRIVE_CDROM
DRIVE_RAMDISK

Example:

@Drives = Win32::AdminMisc::GetDrives();
@CDROMs = Win32::AdminMisc::GetDrives( DRIVE_CDROM );
.