Select Code to Download

my $data = XMLin($xml_string, ForceArray => 1);

...
        print "\t", $location->{locationValue}, "\n";
    }
}