[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: [cobalt-users] [RaQ3] Using chown in Perl scripts



> 
>    mkdir ("$homedir/filter", 0744);
>    chown ($login, $gid, '$homedir/filter');
>    chmod (0600, '$homedir/filter/.forward');
>    chown ($login, $gid, '$homedir/filter/.forward');
>    chmod (0600, '$homedir/filter/.procmailrc');
>    chown ($login, $gid, '$homedir/filter/.procmailrc');
> 

Something seems wrong here.
Try it thus

chown user.group dir/
or
chown uid:gid dir/

example:
# touch foo
# ls -l foo
-rw-r--r--    1 root     root          440 Jan 20 19:40 foo
# chown 1:2 foo
# ls -l foo
-rw-r--r--    1 bin      daemon        440 Jan 20 19:40 foo
[root@ns1 root]# touch bar
# ls -l bar
-rw-r--r--    1 root     root         6079 Jan 20 19:40 bar
# chown bin.daemon bar
# ls -l bar
-rw-r--r--    1 bin      daemon       6079 Jan 20 19:40 bar