support IO object is perl async mode too