You may want to have a look at the Lingua::EN::Sentence module. It includes support for abbreviations and acronyms and has a built-in list of these which cover many of the abbreviations you have listed (see the source code of the module for the full list).

You can also add your own items to the list like this:

use Lingua::EN::Sentence qw( get_sentences add_acronyms );
 
add_acronyms('ed','eds');  # adding support for 'Ed. Eds.'
my $sentences = get_sentences($text);
for my $sentence (@$sentences) {
    # do something with $sentence
}
[download]