Loop:

foreach my $item (@{ $config->{bids}{itemcode} }){
   print "$item\n";
}
[download]

Size:

my $size = @{ $config->{bids}{itemcode} };
[download]

--perlplexer