- or download this
sub FindPicDrive {
foreach (Win32::DriveInfo::DrivesInUse()) {
my $tmp = $_ . ":\\Documents and Settings\\Alan\\My Documents\
+\My Pictures";
...
}
}
}
- or download this
Checking C:\Documents and Settings\Alan\My Documents\My Pictures
Opening C:\Documents and Settings\Alan\My Documents\My Pictures
Open fail Invalid argument -- shouldn't happen -- ignoring...
...
Opening I:\Documents and Settings\Alan\My Documents\My Pictures
I:\Documents and Settings\Alan\My Documents\My Pictures 480
Pic stuff at I:\Documents and Settings\Alan\My Documents\My Pictures
- or download this
Summary of my perl5 (revision 5 version 18 subversion 1) configuration
+:
Platform:
...
C:/strawberry/perl/vendor/lib
C:/strawberry/perl/lib
.