Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl
use strict;
...
    ## All checks have passed after this line ##
    print "$words[2] passes all criteria\n\n";
}

Select or download this

Processing line 1 interested in caggctcaggacttagcaa
Fail: Must contain other than atgc
...

Processing line 4 interested in caggacttagcaaoooaagtt
caggacttagcaaoooaagtt passes all criteria