Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
    }
    warn "record: $record\n";
}

Select or download this

rlength: 4
record: 3J9J
...
record: nXuG
rlength: 4
record: cpXk