Perl › Mojolicious Mojolicious::Liteで作ったリアルタイム時計です。WebSocketを利用しています。ネイティブでWebSocketをサポートしているChromeで実行することができます。 リアルタイム時計 リアルタイム時計です。 ソースコード リアルタイム時計のソースコードです。 use Mojolicious::Lite; use Mojo::IOLoop; my $clients = {}; my $loop = Mojo::IOLoop->singleton; websocket '/' => sub { my $self = shift; # Client id my $cid = "$self"; # Controller my $controller = $self; # Send date and time my $datetime =