Help for this page

Select Code to Download


  1. or download this
    #! perl -slw
use strict;
...
P:\test\demerphq>wc -l test.words
    406 test.words
  2. or download this
    P:\test\demerphq>u:head test.words
AAAAAAAAAA
...
AAAAAAAATC
AAAAAAAATG
AAAAAAAATT
  3. or download this
    P:\test\demerphq>type test.seq
AAAAAAAAAAA
  4. or download this
    [11:37:48.89] P:\test\demerphq>TrieXor.orig.pl test.words test.seq
%#% 11:37:51 ### Start
...
Total Elapsed Time: 0.015625 secs

[11:37:57.14] P:\test\demerphq>