Compare Pastes

Differences between the pastes #144490 (11.09.2020 11:14) and #144491 (11.09.2020 11:40).
11sub ws_feed {
22 my $ws = shift;
33 #~ $ws->inactivity_timeout(300);# переподключение вебсокета
44 my $feed = $ws->param('feed')
55 or return $ws->send("none param feed?");
66
7
  $ws->log->error("Client connect try feed=$feed, but feeds=[@{[ keys %{ $ws->app->feeds} ]}]");
7
  $ws->log->info("Client connect try feed=$feed, but feeds=[@{[ keys %{ $ws->app->feeds} ]}]");
88
99 $feed = $ws->app->feeds->{$feed}
1010 or return $ws->send("yet none feed ".$ws->param('feed'));
1111
1212 my $id = "$ws";
13
  $ws->log->error("Client connected: $id; to feed tx=".$feed->{tx},);
13
  $ws->log->info("Client connected: $id; to feed tx=".$feed->{tx},);
1414 $feed->{clients}{$id} = $ws;
1515 $ws->tx->with_protocols('binary');
1616
1717 $ws->on(
1818 finish => sub {
1919 my( $ws, $code, $reason ) = @_ ;
2020 my $id = "$ws";
2121 $ws->log->error("Client disconnected: $id");
2222 delete $feed->{clients}{ $id };
2323 }
2424 );