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