Help for this page

Select Code to Download


  1. or download this
    use warnings;
use strict;
...
HG00103.P 1 0 0 0 0 0 0 0 0 0 0 0 0
EQ99992.M 1 0 1 0 1 0 1 0 1 0 1 0 1
EQ99992.P 1 0 1 0 1 0 1 0 1 0 1 0 1
  2. or download this
    c:\@Work\Perl\monks\A1 Transcendence>perl filter_MP_records_1.pl
M 'EQ99991.M 0 1 0 0 1 1 0 0 0 1 1 1 0'
...

M 'EQ99992.M 1 0 1 0 1 0 1 0 1 0 1 0 1'
P 'EQ99992.P 1 0 1 0 1 0 1 0 1 0 1 0 1'