sub value { die 'bad' }
my $hash = { "key" => value() }
die 'good'