in reply to Handling caps for surnames with capitals in the middle (was: Irish Surnames)

One of the Best Things About Perl is the CPAN.
One of the Best Things About helping CPAN-Testers is that you learn of modules you otherwise wouldn't...

This looks like a job for Lingua::EN::NameCase.

It misses on 'DeVelera', but gets quite a few others. Perhaps you could patch it to handle some of the names it currently misses, and submit your patch to the author?
(or maybe the 'EN' is being narrowly interpreted...)

use Lingua::EN::NameCase qw( nc ); foreach my $name(qw( mcginley macgee develera )){ print nc( $name ), "\n"; }
See my homenode for more about testing for CPAN.
  • Comment on Re: Handling caps for surnames with capitals in the middle (was: Irish Surnames)
  • Download Code