Use file-read-access? instead of simply file-exists?
No need to check for file existence, file-execute-access? does that already