use strict; use warnings; use Win32::FileOp; my %drive = Mapped or die $^E; for my $key (sort keys %drive) { print "$key = $drive{$key}\n"; } 1; __END__