my $xmlconfig =
{
    'order' => {
        'item-info' => {
            'batch' => {
                'batch-member' => {
                    'aid' => {}
                }
            }
        }
    }
};

##</code><code>##

while(my $batch_aid = $xmlconfig->{order}->{'item-info'}->{batch}->{'batch-member'}->{aid}){
  my $batch_pii = $xmlconfig->{order}->{'item-info'}->{batch}->{'batch-member'}->{$i}->{'pii'};

  my $batch_pit = $xmlconfig->{order}->{'item-info'}->{batch}->{'batch-member'}->{$i}->{'pit'};
  my $batch_doi = $xmlconfig->{order}->{'item-info'}->{batch}->{'batch-member'}->{$i}->{'doi'};
  

  $orderin{$batch_aid} = { 'pit'  => $batch_pit,
                           'pii'  => $batch_pii,
                           'doi'  => $batch_doi,
                         };


  my $Eextra='';
  $i++;
  $orderin{subitem}='Yes';

}