if (($location) && exists($list{$location})) {
    my $value = $list{$location};
    $value++;

    $list{$location} = $value if ($value);