Select Code to Download

use Win32 qw(folder(1));

my $directory = Win32::GetFolderPath(folder(1));

Error:
"folder(1)" is not exported by the Win32 module
Can't continue after import errors at c:\temp\dir5B6B.tmp\AccessFolder
+.pl line 8.
BEGIN failed--compilation aborted at c:\temp\dir5B6B.tmp\AccessFolder 
+line 8.