win32::Perms在vista下不兼容？

lansos

写了个perl脚本，想调用win32:erms来设置本机一个共享文件夹的共享权限。
就是个这么简单的脚本，都过不去。。。
如果是new一个空的object或者别的服务器的共享目录，都可以完成的。就是设置自己机器上的共享不行。
我的电脑上装的vista，是不是Win32:erms在vista下不兼容？或者是vista的哪个local policy要打开呢？
在另一个同事的vista那是可以运行成功的，但是也不知道我们的系统有啥不同，都是公司IT给装的啊。。。

1. use strict;
   
2. use warnings;
   
3. 
   
4. use Win32::Perms;
   
5. $obj1=new Win32::Perms ("\\\\<ip地址>\\a",PERM_TYPE_SHARE) || print "can not create obj1\n";

复制代码

lansos

new一个本地文件夹比如“C:\a”是可以的，就是share路径不行，打印出来“can not create obj1”，郁闷