use Win32;
my $next_drive = Win32::GetNextAvailDrive();