Help for this page

Select Code to Download

Select or download this

my @drives = (
  Win32::GetNextAvailDrive(),
...
  Win32::GetNextAvailDrive(),
);
do_stuff_with(@drives);

Select or download this

for (1..4)
{
  my $drive = Win32::GetNextAvailDrive();
  do_stuff_with($drive);
}