【第四回】一人Scala勉強会の枠が余っていたので参加してきました。Scalaに興味はあるものの中々手を出せなかったのでいい機会だったと思います。 さて今日はアクターモデルがいまいち分からなかったのでPerlで実装してみることにしました。 まずアクターモデル - GIOの日記からActorでフィボナッチ数を求めるコードをPerlに移植します。 #!perl use 5.14.0; use strict; use warnings; package FibActor { use Mouse; with 'Actor::Fake'; sub act { my($self) = @_; $self->receive(sub { my($self, $n) = @_; say $self->name, ': ', $self->fib($n); }); } sub fib { my($self,