1 sub new { 2 my $class = shift; 3 my $self = bless { 4 config => {}, 5 functions => [], 6 }, $class; 7 $self->_init(@_); 8 return $self; 9 } 10