Perl-我怎么知道套接字客户端何时断开连接（用户关闭窗口/浏览器时）

Question

I am using HTML 5 and Perl web server socket. Can the socket server know when user closes the browser? please help Server:

  Net::WebSocket::Server->new(
    listen => 8080,
    on_connect => sub {
        my ($serv, $conn) = @_;
        $conn->on(
            utf8 => sub {
                my ($conn, $msg) = @_;
                $conn->send_utf8($msg);
            },
        disconnect => sub {
        my ($conn, $code, $reason) = @_;
        $conn->disconnect();
    },
        );
    },
)->start;

Answer 1

Yes. Set up a handler for the disconnect event on the socket:

$conn->on(
    disconnect => sub {
        my ($conn, $code, $reason) = @_;
        ...
    },
 );