This is a simple socket programming issue that is not limited to perl. As long as the application keeps the socket open, the port will remain in use in a passive mode. The socket will then become active when a user connects (assuming TCP - UDP is connectionless) to the port. Thusly, causing the port to become active and allows the controlling process to be notified (become active).