Help for this page
use Modern::Perl; my $dat = 'DR Pfam; PF00070; Pyr_redox; 2.'; my $info = (split '; ', $dat)[1]; say $info;
PF00070
www.com | www.net | www.org
No recent polls found