Help for this page

Select Code to Download

Select or download this

use Bio::LocatableSeq ();
use Bio::SimpleAlign  ();
...

print("IDENTITY : ", $aln->percentage_identity, "\n");
print("CONSENSUS: ", $aln->consensus_string(28), "\n");