if (-w -x -r $file) {....}