use warnings;
use strict;

use XML::Rules;

my %data;
my $seller_id;
my @rules = (
  Seller => sub { $seller_id = $_[1]->{sellerIdFromProvider} },
  TaxableLocation => sub { push @{$data{$seller_id}}, $_[1]->{location
+Value} },
  _default => undef,
);

my $xr = XML::Rules->new( rules => \@rules );

$xr->parsefile('file.xml');
use Data::Dumper;
print Dumper \%data;
[download]