$cost = $h->{'Locations',$location,'Buildings',$building,'cost'};

##</code><code>##

  $code = %h{''Locations $location Buildings $building cost''};

##</code><code>##

  $code = %h{''Locations'$location'Buildings'$building'cost''};

##</code><code>##

  $P1['Locations';$S1;'Buildings';$S2;'cost']