Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:
chown getpwnam('username'), getgrnam('group'), @files; chown -1, 1002, @files; # group only chown 1015, -1, @files; # user only [download]