Perl module for matching and stripping the designators on company names (Ltd., LLC, GmbH, etc.)