##
#!/usr/bin/perl
use XML::Simple;
use Data::Dumper;
$xml = new XML::Simple;
foreach $d (@{$data->{'SellerInformation'}}) {
print $d->{'Seller'}{'sellerIdFromProvider'} . "\n";
print $d->{'TaxableLocationsCollection'}{'TaxableLocation'}{'locationValue'} . "\n";
}