Perl-如何知道套接字客戶端何時斷開（當用戶關閉窗口/瀏覽器時）

Question

我正在使用HTML 5和Perl Web服務器套接字。套接字服務器可以在用戶關閉瀏覽器時知道嗎？請幫助 服務器：

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

是的。在插座上設置the disconnect event的處理程序：

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