my @numbers = ( 0..10 );
my @prime_numbers = @numbers[2,3,5,7];

##</code><code>##

my %london = (
    'Area'          =>  1572,       # Sq Km
    'Population'    =>  7_556_900,
    'Elevation'     =>  24,         # m
    'Time_Zone'     =>  'GMT',
    'Mayor'         =>  'Boris Johnson',
    'Long'          =>  '0.1275°W',
    'Lat'           =>  '51.50722°N',
);

my @lat_long = @london{'Lat','Long'};

##</code><code>##

my @location_fields = qw( Lat Long Elevation );

# Using the %london hash defined above
my %london_location = %london{ @location_fields };

##</code><code>##

my %london_location = map {$_=>$london{$_}} @location_fields;