id=$(expr "$file" : "/home/\([^/][^/]*\)/.*")
chown $id:$id $file # chown $id.$id $file