Actually you have a boatload of HTML::Form::TextInput objects. :-)

So

foreach my $thisItem (@newarray){
  print Dumper $thisItem;
  print qq{\n};
  printf qq{type: %s\n}, $thisItem->type;
  exit;
}
[download]

produces (extract)

INPUTS
$VAR1 = bless( {
  '/' => '/',
  'name' => 'EntrezSystem2.PEntrez.DbConnector.Db',
  'readonly' => 1,
  'sid' => '1',
  'type' => 'hidden',
  'value' => 'nuccore',
  'value_name' => ''
}, 'HTML::Form::TextInput' );

type: hidden
[download]