You could try using Win32::Fmode or FileHandle::Fmode to determine if the handle passed is open for the appropriate type of operations.

Note: Both will fail to deal with ramfiles or IO::String handles.