return $n if ( $token =~ m/^$term/i );