my $datacopy = $MySafe::data;
bless $datacopy->{person}, 'Person';