(perl) A POE Filter to handle DNS over TCP connections