sub create {
    my $self = @_;
...