if ($query->param('submit1')){ my $family = $query->param('family'); my $TB = $query->param('TB'); my $LM = $query->param('LM'); my $HS = $query->param('HS'); my $SC = $query->param('SC'); my $AT = $query->param('AT'); print qq|TB: $TB
|; print qq|LM: $LM
|; print qq|HS: $HS
|; print qq|SC: $SC
|; print qq|AT: $AT
|; #### Trypanosoma brucei
Leishmania major
Homo sapiens
Saccharomyces cerevisiae
Arabidopsis thaliana