my $self = fields::new($class);

##</code><code>##

no strict "refs";
my $self = bless [\%{"${caller}::FIELDS"}], $class;