Subject: | doesn't recognize unconnected network-shares as used drive-letter (shares as network-devices) |
Distr.: Win32::DriveInfo, $VERSION = '0.06';
This is perl, v5.8.6 built for MSWin32-x86-multi-thread
OS: Win XP Home, SP2
Reproducing the Error:
Connect a network-share as a network-drive, disconnect the cable, start the following code:
#!/Perl/bin/Perl
use strict;
use warnings;
use Win32::DriveInfo;
my $type = Win32::DriveInfo::DriveType('S');
my @types = (
'the drive type cannot be determined.',
'the root directory does not exist.',
'the drive can be removed from the drive (removable).',
'the disk cannot be removed from the drive (fixed).',
'the drive is a remote (network) drive.',
'the drive is a CD-ROM drive.',
'the drive is a RAM disk.',
);
print $types[$type];
Output: "the root directory does not exist."
If you recive a list of all free drive-letters by Win32::DriveInfo::FreeDriveLetters();, you get the drive-letter of your share.
This behavior should be changed, because the drive-letter is in use.
mfg Alexander Becker