   163		    if ( -l $rfile )	# file is a symbolic link
   164		    {
   165			$to = readlink($rfile);
   166			if ($to)
   167			{
   168	#		    if ( -e $to ) # target exists
   169	#		    {
   170				unless (symlink($to,$lfile))
   171				{
   172				    $msg .=
   173					"\tWARNING: symlink failed, $!; ".
   174					    "$lfile -> $to\n";
   175				}
   176				else
   177				{
   178				    utime($r_atime,$r_mtime,$lfile);
   179				    $msg .= "\tcreated symbolic link $lfile -> $to\n";
   180				}
   181	#		    }
   182	#		    else
   183	#		    {
   184	#			$msg .= "\tWARNING: $rfile points to nonexistant file "
   185	#			    . "$to\n";
   186	#		    }
   187			}
   188			else
   189			{
   190			    $msg .= "\tWARNING: null symlink from $rfile\n";
   191			}
   192		    }
