Select Code to Download

#!/usr/bin/env perl

...
data2
>head3
data3

$ pm_1159403_fasta.pl head1
Found! Head: 'head1'; Data: 'data1'
...
Found! Head: 'head2'; Data: 'data2'
$ pm_1159403_fasta.pl head3
Found! Head: 'head3'; Data: 'data3'