eval "package $pkg; sub new { (shift)->SUPER::new( \%\$fields ); }"