unknownplace.org

use base qw/Class::Accessor::Fast/;

sub new { shift->SUPER::new( @_ > 1 ? {@_} : $_[0] ); }

っていうだけのモジュールがほしい件。

最近 pro 買って使ってるんだけど微妙だなぁ。lite2 ほどではないけれども。

とりあえずこの配列は耐え切れないので mayu 追加ってみた。

key *Backspace = *ReverseSolidus
key *ReverseSolidus = *Backspace
key *Esc = *GraveAccent
key *GraveAccent = *Esc