merlyn,

Thanks for the quick response. I tried this:

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

and got this:

Variable "$fields" will not stay shared at (eval 32) line 1.
[download]

Although the the 300+ tests passed, and if $fields was somehow lost, they would not have passed. Is this warning something I should worry about? Any idea as to what context $fields is not staying shared within?