Permissions 无法使用权限777在perl中创建新目录

Permissions 无法使用权限777在perl中创建新目录,permissions,Permissions,我正在尝试创建一个每个人都可以写入的目录 这是我创建目录时使用的命令类型 if(!-e)/mnt/imports/user){ mkdir(“/mnt/imports/user”,0777)或throw(“无法生成/mnt/imports/user$!”; } 但这是我对目录的特权 drwxr-xr-x 2 lec ensembl 8192 Jun 4 15:15 briggsae_new_2 而目录mnt拥有755权限,而imports拥有777权限。 有人知道我做错了什么吗?您的系统上的um

我正在尝试创建一个每个人都可以写入的目录 这是我创建目录时使用的命令类型 if(!-e)/mnt/imports/user){ mkdir(“/mnt/imports/user”,0777)或throw(“无法生成/mnt/imports/user$!”; } 但这是我对目录的特权 drwxr-xr-x 2 lec ensembl 8192 Jun 4 15:15 briggsae_new_2 而目录mnt拥有755权限,而imports拥有777权限。
有人知道我做错了什么吗?

您的系统上的umask是0022。你可以做:

 if(! -e "/mnt/imports/user"){ mkdir("/mnt/imports/user") && `chmod 777 /mnt/imports/user`}