Select Code to Download

481Finding 883 words (of 5038) took 0.039814 seconds using a hash
482Finding 784 words took 0.027246 seconds using a trie(via regex engi
+ne)

 use strict;
use Data::Dump qw[ pp ];
use Time::HiRes qw[ time ];
...

pp \%matches;
#print $text;