28:              my $text_index = $token->[0] eq 'T' ? 1 : -1;