La función chown

Utilice la función chown para cambiar el propietario y el grupo de un fichero o directorio:

my ($user, $group) = (1004, 100);
chown $user, $group, glob "/tmp/*.c";

Utilice la función getpwnam para traducir de nombre a número y la función getgrnam para traducir de un nombre de grupo a su número:

lhp@nereida:/tmp$ perl -wde 0
  DB<1> @a = getpwnam('elvira')
  DB<2> x @a
0  'elvira'
1  'x'
2  1033
3  1033
4  ''
5  ''
6  'Elvira,,,'
7  '/home/elvira'
8  '/bin/bash'
  DB<3> $a = getpwnam('elvira')
  DB<4> x $a
0  1033
  DB<5>  x getgrnam "users"
0  'users'
1  'x'
2  100
3  ''
  DB<6>  x scalar(getgrnam "users")
0  100