Select Code to Download

foreach (@{$hits}) {
  push @{$ret},join '|', 
...
      $_->{Hit_num},
      $_->{Hit_hsps}->{Hsp}->{Hsp_identity};
}