Help for this page

Select Code to Download

Select or download this

use Win32::OLE qw( in );

...
local $, = ", ";
local $\ = "\n";
print @drives;