Thanks for pointing out the existance of GetFolderPath. But note that this function is only available since perl 5.8.1, so for a compatible solution one has to use Win32::API or Win32::Registry.