if (1) {
    my $b = { 'c' => 0, 'd' => 0 };
    $a{ $b->{ 'c' } } = $b->{
        'd'
      };
}