in reply to Re^5: USB Drive Letter Assignment in Win32
in thread USB Drive Letter Assignment in Win32
Great. Thank you. I have a short demo working:
use Win32::AdminMisc; @drives = Win32::AdminMisc::GetDrives( DRIVE_REMOVABLE ); foreach $drive (@drives){ %Info = Win32::AdminMisc::GetVolumeInfo($drive); # print "Drive $drive label is $Info{Volume}\n"; print "Found USBDRIVE at $drive\n" if $Info{Volume} eq 'USBDRIVE'; }
In Section
Seekers of Perl Wisdom