Select Code to Download

#!/usr/bin/perl
...
parseCmdline();
main();

$blast->{BlastOutput_iterations}->{Iteration}->{Iteration_hits}->{Hit}
+->{Hit_num}

$blast->{BlastOutput_iterations}->{Iteration}->{Iteration_hits}->{Hit}
+->{Hit_hsps}->{Hsp}->{Hsp_identity}