local *call = sub { $self->{$name}->(@_); };