Help for this page

Select Code to Download

Select or download this

for my $inf (@{$data->{'SellerInformation'}})   {
  my $sellerid = $inf->{'Seller'}[0]{'sellerIdFromProvider'};
...
  }
  print $sellerid."\t" .join(", ", @location)."\n";
}