Select Code to Download

#! perl -slw
use strict;
...

$T->report;

#! perl -slw
use strict;
...

print "The number of unique 7-char sequences that can be matched by th
+e regexes is:",
    scalar keys %seen;