my $x;
$x->{hihi}->{haha} = 'hoho';

##</code><code>##

my $x;
my $y = $x->{hihi};
$y->{haha} = 'hoho';