in reply to "missing" perl routines

chmod $mode, $file unless -l $file;

--Bob Niederman, http://bob-n.com