Help for this page
my @drives = ( Win32::GetNextAvailDrive(), ... Win32::GetNextAvailDrive(), ); do_stuff_with(@drives);
for (1..4) { my $drive = Win32::GetNextAvailDrive(); do_stuff_with($drive); }