my $z = 1;
$z->{'text'} = 2;