discupulus@:D>perl -MWin32API::File -E "say for Win32API::File::getLogicalDrives"

C:\
D:\
F:\
L:\
M:\