Help for this page
sub foo { my ($self, %args) = @_; ... answer => 42, %args, );
sub new { my ($class, %args) = @_; ... %args, }, $class; }