@sorted = sort grep { /^[a-z].*[a-z]$/i and not /-{2,}/ } @orig
[download]

The grep expression tests two separate regex matches: (1) must begin and end with a letter, (2) must not have two or more consecutive hyphens.

update: In case you want a case-folded sort (so that "amen" can be placed between "Amen" and "Amenable") add this block between the "sort" and "grep" above (this is copied from "perldoc -f sort"):

{uc($a) cmp uc($b)}
[download]