Hi, We had the same problem here. Just edit /usr/sbin/suidregister, and add the line at line 170:
my ($username, $groupname, $inode); You will also need to edit the following lines so they look like this (basically, just remove the "my" word out of each line: --------------------- # If a [ug]id has an associated user name, return that; otherwise, return the id sub getunam ($) { return ($username = getpwuid($_[0])) ? $username : $_[0] } sub getgnam ($) { return ($groupname = getgrgid($_[0])) ? $groupname : $_[0] } # Return the inode of the file named by the argument # or -1 if there's a problem opening the file sub getinode ($) { return (defined($inode = (stat $_[0])[1]) ? $inode : -1) } ---------------------------------- Regards, Wim Kerkhoff [EMAIL PROTECTED] On 15 Jan 2000, eric k. wolven wrote: > > > Yeah, I get the same. >