# evaluate something in a clean lexical environment
sub _doeval { no strict;  eval shift }