sub new { my ($class, %options) = @_; # validate options return bless \%options, $class; }