(perl) A POE Component providing TCP server services for test cases