in reply to How do I change the owner:group of a symlink?

use Lchown;

lchown $uid, $gid, @linknames or 
   die "Can't 'lchown($uid, $gid, @linknames)': $!";

[download]

See Lchown for details.

In Section Seekers of Perl Wisdom