$ perl -wE 'my $x = { y => 0 }; say $x->{y}' 0