[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
RE: [cobalt-users] [RaQ3] Using chown in Perl scripts
- Subject: RE: [cobalt-users] [RaQ3] Using chown in Perl scripts
- From: "Chris Demain" <cdemain@xxxxxxxxxxx>
- Date: Sun Jan 20 18:04:20 2002
- List-id: Mailing list for users to share thoughts on Cobalt products. <cobalt-users.list.cobalt.com>
>
> 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