writable_real?(p1)
Returns true if the named file is writable by the real user and group id of this process. See access(3)
static VALUE rb_file_writable_real_p(VALUE obj, VALUE fname) { if (rb_access(fname, W_OK) < 0) return Qfalse; return Qtrue; }