perl - Mojo::IOLoop を使用してバッファリングせずにコマンドをソケットに出力する

Question

Mojo サーバーでリアルタイムモードでコマンド (私にとっては長い ping です) を継続的に出力するにはどうすればよいですか? Mojo::IOLoop の例を探しています。たとえば、クライアントがサーバーに接続し、ping XXXX を要求すると、サーバーはバッファリングされていない出力を返します (サーバーの ping は各行を出力に返しますが、クライアントはこの行をソケットから受け取ります)。その後、サーバーは接続を切断する必要があります。