has qw/ base required 1 /;
has qw/ crabs is rw / , builder => sub { IO::File->new( $self->base ) or  ... };