増補改訂版 Java言語で学ぶデザインパターン入門 マルチスレッド編 を参考に Coro で Read-Write Lock パターンを実装。 Read-Write Lockは、 スレッドが読んている間は、別のスレッドも読める スレッドが書いている間は、別のスレッドは読めない スレッドが読んている間は、別のスレッドは書けない スレッドが書いている間は、別のスレッドは書けない #!/usr/bin/perl use strict; use warnings; package Reader; use Coro; sub new { my ( $class, %args ) = @_; my %defaults = ( name => 'Reader' ); %args = ( %defaults, %args ); bless \%args, $class; } sub run { my $s
![Coro で Read-Write Lock パターン - l1o0の日記](https://cdn-ak-scissors.b.st-hatena.com/image/square/543156f96f9e363734921e51151e0e92d0712879/height=288;version=1;width=512/https%3A%2F%2Fimages-fe.ssl-images-amazon.com%2Fimages%2FI%2F41R9eyP8jNL._SL160_.jpg)