my $self = {  map{ $_ => $ENV{$_} } keys %ENV };
my $self = do{ my %h = %ENV; \%h };