if (-w FILEHANDLE) { print "It's writeable by my effective uid or gid!\n"; }