my $result = $t->FindNext(-forwards, -exact, -nocase, "the");
#                                /^\