sub new {
    my $class = shift;
    $class->init( @_);
}