use Lingua::EN::NamedEntity; my @entities = extract_entities($some_text, $max_string_length); #### my @entities = extract_entities($some_text, $max_entity_length);